stylessimpledemomain.dfm

delphi的的三方控件

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