Archivado/Componentes.Terceros.SDAC
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
fff1b2a4dc
Componentes.Terceros.SDAC/internal/4.10.0.10/1/Demos/Win32/ThirdParty/InfoPower/Demo/Main.dfm
david fff1b2a4dc Importación inicial 
git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.SDAC@3 6f543ec7-021b-7e4c-98c9-62eafc7fb9a8
2007-10-05 14:48:18 +00:00

372 lines
9.9 KiB
Plaintext
Raw Blame History

object fmMain: TfmMain
Left = 268
Top = 161
Width = 641
Height = 371
Caption = 'MS SQL Server Data Access demo - InfoPower support'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object wwDBGrid1: TwwDBGrid
Left = 0
Top = 25
Width = 633
Height = 319
IniAttributes.Delimiter = ';;'
TitleColor = clBtnFace
FixedCols = 0
ShowHorzScrollBar = True
Align = alClient
DataSource = wwDataSource1
TabOrder = 0
TitleAlignment = taLeftJustify
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
TitleLines = 1
TitleButtons = False
IndicatorColor = icBlack
FooterCellColor = clInfoBk
object wwDBGrid1IButton: TwwIButton
Left = 0
Top = 0
Width = 13
Height = 22
AllowAllUp = True
Caption = '!'
end
end
object ToolBar: TPanel
Left = 0
Top = 0
Width = 633
Height = 25
Align = alTop
BevelOuter = bvNone
TabOrder = 1
object btOpen: TButton
Left = 0
Top = 1
Width = 75
Height = 25
Caption = 'Open'
TabOrder = 0
OnClick = btOpenClick
end
object btClose: TButton
Left = 76
Top = 1
Width = 75
Height = 25
Caption = 'Close'
TabOrder = 1
OnClick = btCloseClick
end
object wwDBNavigator1: TwwDBNavigator
Left = 152
Top = 0
Width = 350
Height = 25
DataSource = wwDataSource1
RepeatInterval.InitialDelay = 500
RepeatInterval.Interval = 100
object wwDBNavigator1First: TwwNavButton
Left = 0
Top = 0
Width = 25
Height = 25
Hint = 'Move to first record'
ImageIndex = -1
NumGlyphs = 2
Spacing = 4
Transparent = False
Caption = 'wwDBNavigator1First'
Enabled = False
DisabledTextColors.ShadeColor = clGray
DisabledTextColors.HighlightColor = clBtnHighlight
Index = 0
Style = nbsFirst
end
object wwDBNavigator1PriorPage: TwwNavButton
Left = 25
Top = 0
Width = 25
Height = 25
Hint = 'Move backward 10 records'
ImageIndex = -1
NumGlyphs = 2
Spacing = 4
Transparent = False
Caption = 'wwDBNavigator1PriorPage'
Enabled = False
DisabledTextColors.ShadeColor = clGray
DisabledTextColors.HighlightColor = clBtnHighlight
Index = 1
Style = nbsPriorPage
end
object wwDBNavigator1Prior: TwwNavButton
Left = 50
Top = 0
Width = 25
Height = 25
Hint = 'Move to prior record'
ImageIndex = -1
NumGlyphs = 2
Spacing = 4
Transparent = False
Caption = 'wwDBNavigator1Prior'
Enabled = False
DisabledTextColors.ShadeColor = clGray
DisabledTextColors.HighlightColor = clBtnHighlight
Index = 2
Style = nbsPrior
end
object wwDBNavigator1Next: TwwNavButton
Left = 75
Top = 0
Width = 25
Height = 25
Hint = 'Move to next record'
ImageIndex = -1
NumGlyphs = 2
Spacing = 4
Transparent = False
Caption = 'wwDBNavigator1Next'
Enabled = False
DisabledTextColors.ShadeColor = clGray
DisabledTextColors.HighlightColor = clBtnHighlight
Index = 3
Style = nbsNext
end
object wwDBNavigator1NextPage: TwwNavButton
Left = 100
Top = 0
Width = 25
Height = 25
Hint = 'Move forward 10 records'
ImageIndex = -1
NumGlyphs = 2
Spacing = 4
Transparent = False
Caption = 'wwDBNavigator1NextPage'
Enabled = False
DisabledTextColors.ShadeColor = clGray
DisabledTextColors.HighlightColor = clBtnHighlight
Index = 4
Style = nbsNextPage
end
object wwDBNavigator1Last: TwwNavButton
Left = 125
Top = 0
Width = 25
Height = 25
Hint = 'Move to last record'
ImageIndex = -1
NumGlyphs = 2
Spacing = 4
Transparent = False
Caption = 'wwDBNavigator1Last'
Enabled = False
DisabledTextColors.ShadeColor = clGray
DisabledTextColors.HighlightColor = clBtnHighlight
Index = 5
Style = nbsLast
end
object wwDBNavigator1Insert: TwwNavButton
Left = 150
Top = 0
Width = 25
Height = 25
Hint = 'Insert new record'
ImageIndex = -1
NumGlyphs = 2
Spacing = 4
Transparent = False
Caption = 'wwDBNavigator1Insert'
Enabled = False
DisabledTextColors.ShadeColor = clGray
DisabledTextColors.HighlightColor = clBtnHighlight
Index = 6
Style = nbsInsert
end
object wwDBNavigator1Delete: TwwNavButton
Left = 175
Top = 0
Width = 25
Height = 25
Hint = 'Delete current record'
ImageIndex = -1
NumGlyphs = 2
Spacing = 4
Transparent = False
Caption = 'wwDBNavigator1Delete'
Enabled = False
DisabledTextColors.ShadeColor = clGray
DisabledTextColors.HighlightColor = clBtnHighlight
Index = 7
Style = nbsDelete
end
object wwDBNavigator1Edit: TwwNavButton
Left = 200
Top = 0
Width = 25
Height = 25
Hint = 'Edit current record'
ImageIndex = -1
NumGlyphs = 2
Spacing = 4
Transparent = False
Caption = 'wwDBNavigator1Edit'
Enabled = False
DisabledTextColors.ShadeColor = clGray
DisabledTextColors.HighlightColor = clBtnHighlight
Index = 8
Style = nbsEdit
end
object wwDBNavigator1Post: TwwNavButton
Left = 225
Top = 0
Width = 25
Height = 25
Hint = 'Post changes of current record'
ImageIndex = -1
NumGlyphs = 2
Spacing = 4
Transparent = False
Caption = 'wwDBNavigator1Post'
Enabled = False
DisabledTextColors.ShadeColor = clGray
DisabledTextColors.HighlightColor = clBtnHighlight
Index = 9
Style = nbsPost
end
object wwDBNavigator1Cancel: TwwNavButton
Left = 250
Top = 0
Width = 25
Height = 25
Hint = 'Cancel changes made to current record'
ImageIndex = -1
NumGlyphs = 2
Spacing = 4
Transparent = False
Caption = 'wwDBNavigator1Cancel'
Enabled = False
DisabledTextColors.ShadeColor = clGray
DisabledTextColors.HighlightColor = clBtnHighlight
Index = 10
Style = nbsCancel
end
object wwDBNavigator1Refresh: TwwNavButton
Left = 275
Top = 0
Width = 25
Height = 25
Hint = 'Refresh the contents of the dataset'
ImageIndex = -1
NumGlyphs = 2
Spacing = 4
Transparent = False
Caption = 'wwDBNavigator1Refresh'
Enabled = False
DisabledTextColors.ShadeColor = clGray
DisabledTextColors.HighlightColor = clBtnHighlight
Index = 11
Style = nbsRefresh
end
object wwDBNavigator1SaveBookmark: TwwNavButton
Left = 300
Top = 0
Width = 25
Height = 25
Hint = 'Bookmark current record'
ImageIndex = -1
NumGlyphs = 2
Spacing = 4
Transparent = False
Caption = 'wwDBNavigator1SaveBookmark'
Enabled = False
DisabledTextColors.ShadeColor = clGray
DisabledTextColors.HighlightColor = clBtnHighlight
Index = 12
Style = nbsSaveBookmark
end
object wwDBNavigator1RestoreBookmark: TwwNavButton
Left = 325
Top = 0
Width = 25
Height = 25
Hint = 'Go back to saved bookmark'
ImageIndex = -1
NumGlyphs = 2
Spacing = 4
Transparent = False
Caption = 'wwDBNavigator1RestoreBookmark'
Enabled = False
DisabledTextColors.ShadeColor = clGray
DisabledTextColors.HighlightColor = clBtnHighlight
Index = 13
Style = nbsRestoreBookmark
end
end
end
object MSConnection1: TMSConnection
Database = 'SDACDemos'
Authentication = auServer
Left = 280
Top = 32
end
object wwDataSource1: TwwDataSource
DataSet = wwMSQuery
Left = 344
Top = 32
end
object wwMSQuery: TwwMSQuery
Connection = MSConnection1
SQL.Strings = (
'SELECT * FROM Emp')
ControlType.Strings = (
'Discontinued;CheckBox;True;False')
PictureMasks.Strings = (
'Discontinued'#9'{True,False}'#9'T'#9'T')
ValidateWithMask = True
Left = 312
Top = 32
object wwMSQueryEMPNO: TIntegerField
FieldName = 'EMPNO'
ReadOnly = True
end
object wwMSQueryENAME: TStringField
FieldName = 'ENAME'
Size = 10
end
object wwMSQueryJOB: TStringField
FieldName = 'JOB'
Size = 9
end
object wwMSQueryMGR: TIntegerField
FieldName = 'MGR'
end
object wwMSQueryHIREDATE: TDateTimeField
FieldName = 'HIREDATE'
end
object wwMSQuerySAL: TFloatField
FieldName = 'SAL'
end
object wwMSQueryCOMM: TFloatField
FieldName = 'COMM'
end
object wwMSQueryDEPTNO: TIntegerField
FieldName = 'DEPTNO'
end
end
end
Reference in New Issue View Git Blame Copy Permalink