Componentes.Terceros.DevExp.../official/x.26/ExpressVerticalGrid/Demos/Delphi/StylesSimpleDemo/StylesSimpleDemoMain.dfm
2007-09-09 11:27:27 +00:00

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