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