git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.DevExpressVCL@8 05c56307-c608-d34a-929d-697000501d7a
224 lines
8.2 KiB
Plaintext
224 lines
8.2 KiB
Plaintext
inherited StylesSimpleDemoMainForm: TStylesSimpleDemoMainForm
|
|
Left = 347
|
|
Top = 208
|
|
Width = 717
|
|
Height = 619
|
|
Caption = 'ExpressVerticalGrid StylesSimple Demo'
|
|
OnCreate = FormCreate
|
|
OnShow = FormShow
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
inherited lbDescrip: TLabel
|
|
Width = 709
|
|
Caption =
|
|
'Change the style of various ExpressVerticalGrid display elements' +
|
|
'. See Help/About on how to use the Styles Dialog'
|
|
end
|
|
inherited sbMain: TStatusBar
|
|
Top = 546
|
|
Width = 709
|
|
end
|
|
inherited memAboutText: TMemo
|
|
Lines.Strings = (
|
|
|
|
'This demo provides a non-modal Styles Dialog that allows you to ' +
|
|
'change the styles of an ExpressVerticalGrid'#39's display elements.'
|
|
''
|
|
'The dialog can be used in two ways:'
|
|
''
|
|
|
|
'1) to assign a style to a grid element. Select a Style Name cell' +
|
|
' in the dialog and use its dropdown combo.'
|
|
''
|
|
|
|
'2) change one of the styles. Select a Style Name cell and use it' +
|
|
's ellipsis button. Note: this will change the look of every grid' +
|
|
' element assigned to the style.'
|
|
''
|
|
|
|
'Use the '#39'Restore Defaults'#39' button to reverse all your changes, t' +
|
|
'hus allowing you to experiment safely.'
|
|
''
|
|
'')
|
|
end
|
|
object cxDBVerticalGrid: TcxDBVerticalGrid [3]
|
|
Left = 0
|
|
Top = 32
|
|
Width = 709
|
|
Height = 514
|
|
Styles.StyleSheet = StylesSimpleDemoDataDM.UserStyleSheet
|
|
Align = alClient
|
|
LayoutStyle = lsBandsView
|
|
OptionsView.GridLineColor = 14869218
|
|
OptionsView.RowHeaderWidth = 204
|
|
OptionsBehavior.AlwaysShowEditor = False
|
|
OptionsBehavior.CellHints = False
|
|
OptionsBehavior.BandSizing = False
|
|
OptionsBehavior.IncSearch = True
|
|
TabOrder = 2
|
|
DataController.DataSource = StylesSimpleDemoDataDM.dsOrders
|
|
object cxDBVerticalGridOrderInfo: TcxCategoryRow
|
|
Properties.Caption = 'Order Info'
|
|
object cxDBVerticalGridPurchaseDate: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'PurchaseDate'
|
|
end
|
|
object cxDBVerticalGridTime: TcxDBEditorRow
|
|
Properties.EditPropertiesClassName = 'TcxTimeEditProperties'
|
|
Properties.DataBinding.FieldName = 'Time'
|
|
end
|
|
object cxDBVerticalGridPaymentType: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'PaymentType'
|
|
end
|
|
object cxDBVerticalGridPaymentAmount: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'PaymentAmount'
|
|
end
|
|
object cxDBVerticalGridQuantity: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'Quantity'
|
|
end
|
|
end
|
|
object cxDBVerticalGridCustomerInfo: TcxCategoryRow
|
|
Properties.Caption = 'Customer Info'
|
|
object cxDBVerticalGridCommonCustomerInfo: TcxCategoryRow
|
|
Properties.Caption = 'Common Customer Info'
|
|
object cxDBVerticalGridFirstName: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'FirstName'
|
|
end
|
|
object cxDBVerticalGridLastName: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'LastName'
|
|
end
|
|
object cxDBVerticalGridSpouse: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'Spouse'
|
|
end
|
|
object cxDBVerticalGridPrefix: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'Prefix'
|
|
end
|
|
object cxDBVerticalGridTitle: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'Title'
|
|
end
|
|
end
|
|
object cxDBVerticalGridCustomerContacts: TcxCategoryRow
|
|
Properties.Caption = 'Customer Contacts'
|
|
object cxDBVerticalGridPhonesAndFaxes: TcxCategoryRow
|
|
Properties.Caption = 'Phones&Faxes'
|
|
object cxDBVerticalGridFaxPhone: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'FaxPhone'
|
|
end
|
|
object cxDBVerticalGridHomePhone: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'HomePhone'
|
|
end
|
|
end
|
|
object cxDBVerticalGridCategoryAddress: TcxCategoryRow
|
|
Properties.Caption = 'Address'
|
|
object cxDBVerticalGridState: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'State'
|
|
end
|
|
object cxDBVerticalGridCity: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'City'
|
|
end
|
|
object cxDBVerticalGridAddress: TcxDBEditorRow
|
|
Properties.Caption = 'Street'
|
|
Properties.DataBinding.FieldName = 'Address'
|
|
end
|
|
object cxDBVerticalGridZipCode: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'ZipCode'
|
|
end
|
|
end
|
|
object cxDBVerticalGridEmail: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'Email'
|
|
end
|
|
end
|
|
object cxDBVerticalGridOccupation: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'Occupation'
|
|
end
|
|
object cxDBVerticalGridCustomer: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'Customer'
|
|
end
|
|
object cxDBVerticalGridCompany: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'Company'
|
|
end
|
|
end
|
|
object cxDBVerticalGridCarInfo: TcxCategoryRow
|
|
Properties.Caption = 'CarInfo'
|
|
object cxDBVerticalGridCar: TcxCategoryRow
|
|
Properties.Caption = 'Car'
|
|
object cxDBVerticalGridTrademark: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'Trademark'
|
|
end
|
|
object cxDBVerticalGridModel: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'Model'
|
|
end
|
|
end
|
|
object cxDBVerticalGridMPG: TcxCategoryRow
|
|
Properties.Caption = 'MPG'
|
|
object cxDBVerticalGridMPG_City: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'MPG_City'
|
|
end
|
|
object cxDBVerticalGridMPG_Highway: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'MPG_Highway'
|
|
end
|
|
end
|
|
object cxDBVerticalGridEngine: TcxCategoryRow
|
|
Properties.Caption = 'Engine'
|
|
object cxDBVerticalGridHP: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'HP'
|
|
end
|
|
object cxDBVerticalGridLiter: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'Liter'
|
|
end
|
|
object cxDBVerticalGridCyl: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'Cyl'
|
|
end
|
|
end
|
|
object cxDBVerticalGridNotes: TcxCategoryRow
|
|
Properties.Caption = 'Notes'
|
|
object cxDBVerticalGridCars_Description: TcxDBEditorRow
|
|
Properties.Caption = 'Description'
|
|
Properties.DataBinding.FieldName = 'Cars_Description'
|
|
end
|
|
end
|
|
object cxDBVerticalGridTransmission: TcxCategoryRow
|
|
Properties.Caption = 'Transmission'
|
|
object cxDBVerticalGridTransmissSpeedCount: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'TransmissSpeedCount'
|
|
end
|
|
object cxDBVerticalGridTransmissAutomatic: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'TransmissAutomatic'
|
|
end
|
|
end
|
|
object cxDBVerticalGridOthers: TcxCategoryRow
|
|
Properties.Caption = 'Others'
|
|
object cxDBVerticalGridCategory: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'Category'
|
|
end
|
|
object cxDBVerticalGridHyperlink: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'Hyperlink'
|
|
end
|
|
object cxDBVerticalGridPrice: TcxDBEditorRow
|
|
Properties.DataBinding.FieldName = 'Price'
|
|
end
|
|
object cxDBVerticalGridPicture: TcxDBEditorRow
|
|
Properties.EditPropertiesClassName = 'TcxBlobEditProperties'
|
|
Properties.EditProperties.BlobEditKind = bekPict
|
|
Properties.EditProperties.PictureGraphicClassName = 'TJPEGImage'
|
|
Properties.DataBinding.FieldName = 'Picture'
|
|
end
|
|
end
|
|
end
|
|
end
|
|
inherited mmMain: TMainMenu
|
|
inherited miOptions: TMenuItem
|
|
object ShowStyleDialog1: TMenuItem [0]
|
|
Action = actShowStyleDialog
|
|
end
|
|
end
|
|
end
|
|
inherited alMain: TActionList
|
|
object actShowStyleDialog: TAction
|
|
Category = 'Options'
|
|
Caption = 'Show &StyleDialog...'
|
|
Checked = True
|
|
OnExecute = actShowStyleDialogExecute
|
|
end
|
|
end
|
|
end
|