git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.DevExpressVCL@8 05c56307-c608-d34a-929d-697000501d7a
197 lines
5.3 KiB
Plaintext
197 lines
5.3 KiB
Plaintext
inherited ProviderModeDemoMainForm: TProviderModeDemoMainForm
|
|
Left = 350
|
|
Top = 208
|
|
Width = 602
|
|
Height = 307
|
|
Caption = 'ExpressVerticalGrid ProviderModeDemo'
|
|
OnCloseQuery = FormCloseQuery
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
inherited lbDescrip: TLabel
|
|
Width = 594
|
|
Caption =
|
|
'Uses the ExpressVerticalGrid in provider mode with a text file a' +
|
|
's its data. Experiment by selecting the Options above and also s' +
|
|
'ee Help/About for other things to try.'
|
|
end
|
|
inherited sbMain: TStatusBar
|
|
Top = 235
|
|
Width = 594
|
|
end
|
|
inherited memAboutText: TMemo
|
|
Left = 656
|
|
Top = 256
|
|
Lines.Strings = (
|
|
'In this demo you can:'
|
|
''
|
|
|
|
'- edit the customer list by pressing the Insert and Delete butto' +
|
|
'ns (note the effect on the ID value)'
|
|
''
|
|
|
|
'- use the cxNavigator buttons. In particular try setting/using t' +
|
|
'he bookmark and filtering (the rightmost three buttons)'
|
|
''
|
|
|
|
'- examine the code in the LoadData method to see how easy it is ' +
|
|
'to handle text data'
|
|
''
|
|
'')
|
|
TabOrder = 2
|
|
end
|
|
object cxVirtualVerticalGrid: TcxVirtualVerticalGrid [3]
|
|
Left = 0
|
|
Top = 32
|
|
Width = 594
|
|
Height = 160
|
|
Styles.StyleSheet = cxVerticalGridStyleSheetDevExpress
|
|
Align = alTop
|
|
Anchors = [akLeft, akTop, akRight, akBottom]
|
|
LayoutStyle = lsMultiRecordView
|
|
OptionsView.CellAutoHeight = True
|
|
OptionsView.CellEndEllipsis = True
|
|
OptionsView.RowHeaderWidth = 143
|
|
OptionsView.ValueWidth = 55
|
|
TabOrder = 1
|
|
end
|
|
object cxNavigator1: TcxNavigator [4]
|
|
Left = 160
|
|
Top = 208
|
|
Width = 225
|
|
Height = 25
|
|
Control = cxVirtualVerticalGrid
|
|
Anchors = [akLeft, akBottom]
|
|
TabOrder = 3
|
|
end
|
|
inherited mmMain: TMainMenu
|
|
Top = 40
|
|
inherited miOptions: TMenuItem
|
|
object CellEndEllipsis1: TMenuItem [0]
|
|
Action = actCellEndEllipsis
|
|
end
|
|
object CellAutoHeight1: TMenuItem [1]
|
|
Action = actCellAutoHeight
|
|
end
|
|
object GridLines1: TMenuItem [2]
|
|
Caption = 'Grid Lines'
|
|
object Node1: TMenuItem
|
|
Caption = 'None'
|
|
RadioItem = True
|
|
OnClick = miLinesClick
|
|
end
|
|
object Horizontal1: TMenuItem
|
|
Tag = 1
|
|
Caption = 'Horizontal'
|
|
RadioItem = True
|
|
OnClick = miLinesClick
|
|
end
|
|
object Vertical1: TMenuItem
|
|
Tag = 2
|
|
Caption = 'Vertical'
|
|
RadioItem = True
|
|
OnClick = miLinesClick
|
|
end
|
|
object Both1: TMenuItem
|
|
Tag = 3
|
|
Caption = 'Both'
|
|
Checked = True
|
|
RadioItem = True
|
|
OnClick = miLinesClick
|
|
end
|
|
end
|
|
object miSeparator1: TMenuItem [3]
|
|
Caption = '-'
|
|
end
|
|
end
|
|
end
|
|
inherited ilMain: TImageList
|
|
Left = 464
|
|
Top = 40
|
|
end
|
|
inherited alMain: TActionList
|
|
Left = 408
|
|
Top = 40
|
|
object actCellAutoHeight: TAction
|
|
Category = 'Options'
|
|
Caption = '&CellAutoHeight'
|
|
Checked = True
|
|
OnExecute = actCellAutoHeightExecute
|
|
end
|
|
object actCellEndEllipsis: TAction
|
|
Category = 'Options'
|
|
Caption = 'CellEnd&Ellipsis'
|
|
Checked = True
|
|
OnExecute = actCellEndEllipsisExecute
|
|
end
|
|
end
|
|
inherited cxLookAndFeelController: TcxLookAndFeelController
|
|
Left = 376
|
|
Top = 32
|
|
end
|
|
object StyleRepository: TcxStyleRepository
|
|
Left = 336
|
|
Top = 32
|
|
object cxStyle1: TcxStyle
|
|
AssignedValues = [svColor]
|
|
Color = 14590588
|
|
end
|
|
object cxStyle2: TcxStyle
|
|
AssignedValues = [svColor, svFont, svTextColor]
|
|
Color = 13795663
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = [fsBold]
|
|
TextColor = clYellow
|
|
end
|
|
object cxStyle3: TcxStyle
|
|
AssignedValues = [svColor, svFont, svTextColor]
|
|
Color = 16247513
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clNavy
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
TextColor = clNavy
|
|
end
|
|
object cxStyle4: TcxStyle
|
|
AssignedValues = [svColor, svTextColor]
|
|
Color = 14590588
|
|
TextColor = clWhite
|
|
end
|
|
object cxStyle5: TcxStyle
|
|
AssignedValues = [svColor]
|
|
Color = 15185807
|
|
end
|
|
object cxStyle6: TcxStyle
|
|
AssignedValues = [svColor, svTextColor]
|
|
Color = 4707838
|
|
TextColor = clBlack
|
|
end
|
|
object cxStyle7: TcxStyle
|
|
AssignedValues = [svColor, svFont, svTextColor]
|
|
Color = 15120279
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWhite
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
TextColor = clWhite
|
|
end
|
|
object cxVerticalGridStyleSheetDevExpress: TcxVerticalGridStyleSheet
|
|
Caption = 'DevExpress'
|
|
Styles.Background = cxStyle1
|
|
Styles.Content = cxStyle3
|
|
Styles.Inactive = cxStyle5
|
|
Styles.Selection = cxStyle7
|
|
Styles.Category = cxStyle2
|
|
Styles.Header = cxStyle4
|
|
Styles.IncSearch = cxStyle6
|
|
BuiltIn = True
|
|
end
|
|
end
|
|
end
|