object fmMain: TfmMain
  Left = 194
  Top = 107
  Width = 695
  Height = 487
  Caption = 'ExpressMasterView - Styles Demo'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object pnBottom: TPanel
    Left = 0
    Top = 392
    Width = 687
    Height = 68
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 0
    object Label1: TLabel
      Left = 5
      Top = 16
      Width = 26
      Height = 13
      Caption = 'Level'
    end
    object Label2: TLabel
      Left = 160
      Top = 16
      Width = 38
      Height = 13
      Caption = 'Element'
    end
    object Label3: TLabel
      Left = 320
      Top = 16
      Width = 23
      Height = 13
      Caption = 'Style'
    end
    object Label4: TLabel
      Left = 4
      Top = 46
      Width = 35
      Height = 13
      Caption = 'Column'
    end
    object Label5: TLabel
      Left = 160
      Top = 46
      Width = 38
      Height = 13
      Caption = 'Element'
    end
    object Label6: TLabel
      Left = 320
      Top = 46
      Width = 23
      Height = 13
      Caption = 'Style'
    end
    object cmbLevels: TComboBox
      Left = 48
      Top = 8
      Width = 97
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      Items.Strings = (
        'Level1'
        'Level2')
      TabOrder = 0
      OnChange = cmbLevelsChange
    end
    object cmbLevelElements: TComboBox
      Left = 208
      Top = 8
      Width = 97
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      Items.Strings = (
        'Caption'
        'Content'
        'Footer'
        'GroupByBox'
        'Group'
        'Header'
        'Preview')
      TabOrder = 1
      OnChange = cmbLevelElementsChange
    end
    object cmbLevelStyle: TComboBox
      Left = 352
      Top = 8
      Width = 97
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 2
      OnChange = cmbLevelStyleChange
    end
    object cmbColumns: TComboBox
      Left = 48
      Top = 38
      Width = 97
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 3
      OnChange = cmbColumnsChange
    end
    object cmbColumnElements: TComboBox
      Left = 208
      Top = 38
      Width = 97
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      Items.Strings = (
        'Content'
        'Footer'
        'Header')
      TabOrder = 4
      OnChange = cmbColumnElementsChange
    end
    object cmbColumnStyle: TComboBox
      Left = 352
      Top = 38
      Width = 97
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 5
      OnChange = cmbColumnStyleChange
    end
  end
  object pnLeft: TPanel
    Left = 502
    Top = 0
    Width = 185
    Height = 392
    Align = alRight
    TabOrder = 1
    object GroupBox1: TGroupBox
      Left = 6
      Top = 6
      Width = 174
      Height = 323
      Caption = 'Style'
      TabOrder = 0
      object btnNew: TButton
        Left = 8
        Top = 280
        Width = 75
        Height = 25
        Caption = 'New'
        TabOrder = 0
        OnClick = btnNewClick
      end
      object btnDelete: TButton
        Left = 96
        Top = 280
        Width = 75
        Height = 25
        Caption = 'Delete'
        TabOrder = 1
        OnClick = btnDeleteClick
      end
      object btnColor: TButton
        Left = 8
        Top = 184
        Width = 75
        Height = 25
        Caption = 'Color'
        TabOrder = 2
        OnClick = btnColorClick
      end
      object plColor: TPanel
        Left = 8
        Top = 152
        Width = 75
        Height = 25
        BevelInner = bvLowered
        BevelOuter = bvNone
        Caption = 'plColor'
        Ctl3D = True
        ParentCtl3D = False
        TabOrder = 3
      end
      object plAnotherColor: TPanel
        Left = 91
        Top = 152
        Width = 75
        Height = 25
        BevelOuter = bvLowered
        Caption = 'plAnotherColor'
        TabOrder = 4
      end
      object btnAnotherColor: TButton
        Left = 91
        Top = 184
        Width = 75
        Height = 25
        Caption = 'AnotherColor'
        TabOrder = 5
        OnClick = btnAnotherColorClick
      end
      object btnFont: TButton
        Left = 8
        Top = 216
        Width = 75
        Height = 25
        Caption = 'Font'
        TabOrder = 6
        OnClick = btnFontClick
      end
      object cmbStyles: TListBox
        Left = 8
        Top = 16
        Width = 153
        Height = 129
        ItemHeight = 13
        TabOrder = 7
        OnClick = cmbStylesChange
      end
    end
    object btnCustomize: TButton
      Left = 16
      Top = 360
      Width = 75
      Height = 25
      Caption = 'Customize'
      TabOrder = 1
      OnClick = btnCustomizeClick
    end
  end
  object MasterView: TdxMasterView
    Left = 0
    Top = 0
    Width = 502
    Height = 392
    Align = alClient
    TabOrder = 2
    object Style1: TdxMasterViewStyle
      AnotherColor = clInfoBk
      Color = clMenu
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      AssignedValues = [svAnotherColor, svColor, svFont]
    end
    object Style2: TdxMasterViewStyle
      Color = 11041630
      AssignedValues = [svColor]
    end
    object Level1: TdxMasterViewLevel
      Caption = 'Level1'
      ContentStyle = Style1
      DataSource = dsCustomer
      HeaderStyle = Style2
      ID = 'CustNo'
      OptionsCustomizeBox = [loxCaption, loxColumns, loxFooter, loxGrid, loxGroupByBox, loxHeader, loxPreview, loxViewMode]
      OptionsView = [lovFooter, lovGrid, lovGridWithPreview, lovGroupByBox, lovHeader, lovOccupyRestSpace]
      PreviewFieldName = 'Company'
      object CustNo: TdxMasterViewColumn
        FieldName = 'CustNo'
        RowIndex = 0
        ColIndex = 0
        SummaryType = stCount
      end
      object Company: TdxMasterViewColumn
        FieldName = 'Company'
        RowIndex = 0
        ColIndex = 1
      end
      object Addr1: TdxMasterViewColumn
        FieldName = 'Addr1'
        RowIndex = 0
        ColIndex = 2
      end
      object Addr2: TdxMasterViewColumn
        FieldName = 'Addr2'
        RowIndex = 0
        ColIndex = 3
      end
      object City: TdxMasterViewColumn
        FieldName = 'City'
        RowIndex = 0
        ColIndex = 4
      end
      object State: TdxMasterViewColumn
        FieldName = 'State'
        RowIndex = 0
        ColIndex = 5
      end
      object Zip: TdxMasterViewColumn
        FieldName = 'Zip'
        RowIndex = 0
        ColIndex = 6
      end
      object Country: TdxMasterViewColumn
        FieldName = 'Country'
        RowIndex = 0
        ColIndex = 7
      end
      object Phone: TdxMasterViewColumn
        FieldName = 'Phone'
        RowIndex = 0
        ColIndex = 8
      end
      object FAX: TdxMasterViewColumn
        FieldName = 'FAX'
        RowIndex = 0
        ColIndex = 9
      end
      object TaxRate: TdxMasterViewColumn
        FieldName = 'TaxRate'
        RowIndex = 0
        ColIndex = 10
      end
      object Contact: TdxMasterViewColumn
        FieldName = 'Contact'
        RowIndex = 0
        ColIndex = 11
      end
      object LastInvoiceDate: TdxMasterViewColumn
        Caption = 'LastInvoice Date'
        FieldName = 'LastInvoiceDate'
        RowIndex = 0
        ColIndex = 12
      end
      object Level2: TdxMasterViewLevel
        Caption = 'Level2'
        DataSource = dsOrders
        DetailKey = 'CustNo'
        ID = 'OrderNo'
        MasterKey = 'CustNo'
        OptionsCustomizeBox = [loxCaption, loxColumns, loxFooter, loxGrid, loxGroupByBox, loxHeader, loxPreview, loxViewMode]
        object OrderNo: TdxMasterViewColumn
          FieldName = 'OrderNo'
          RowIndex = 0
          ColIndex = 0
        end
        object CustNoL2: TdxMasterViewColumn
          FieldName = 'CustNo'
          RowIndex = 0
          ColIndex = 1
        end
        object SaleDate: TdxMasterViewColumn
          FieldName = 'SaleDate'
          RowIndex = 0
          ColIndex = 2
        end
        object ShipDate: TdxMasterViewColumn
          FieldName = 'ShipDate'
          RowIndex = 0
          ColIndex = 3
        end
        object EmpNo: TdxMasterViewColumn
          FieldName = 'EmpNo'
          RowIndex = 0
          ColIndex = 4
        end
        object ShipToContact: TdxMasterViewColumn
          FieldName = 'ShipToContact'
          RowIndex = 0
          ColIndex = 5
        end
        object ShipToAddr1: TdxMasterViewColumn
          FieldName = 'ShipToAddr1'
          RowIndex = 0
          ColIndex = 6
        end
        object ShipToAddr2: TdxMasterViewColumn
          FieldName = 'ShipToAddr2'
          RowIndex = 0
          ColIndex = 7
        end
        object ShipToCity: TdxMasterViewColumn
          FieldName = 'ShipToCity'
          RowIndex = 0
          ColIndex = 8
        end
        object ShipToState: TdxMasterViewColumn
          FieldName = 'ShipToState'
          RowIndex = 0
          ColIndex = 9
        end
        object ShipToZip: TdxMasterViewColumn
          FieldName = 'ShipToZip'
          RowIndex = 0
          ColIndex = 10
        end
        object ShipToCountry: TdxMasterViewColumn
          FieldName = 'ShipToCountry'
          RowIndex = 0
          ColIndex = 11
        end
        object ShipToPhone: TdxMasterViewColumn
          FieldName = 'ShipToPhone'
          RowIndex = 0
          ColIndex = 12
        end
        object ShipVIA: TdxMasterViewColumn
          FieldName = 'ShipVIA'
          RowIndex = 0
          ColIndex = 13
        end
        object PO: TdxMasterViewColumn
          FieldName = 'PO'
          RowIndex = 0
          ColIndex = 14
        end
        object Terms: TdxMasterViewColumn
          FieldName = 'Terms'
          RowIndex = 0
          ColIndex = 15
        end
        object PaymentMethod: TdxMasterViewColumn
          FieldName = 'PaymentMethod'
          RowIndex = 0
          ColIndex = 16
        end
        object ItemsTotal: TdxMasterViewColumn
          FieldName = 'ItemsTotal'
          RowIndex = 0
          ColIndex = 17
        end
        object TaxRateL2: TdxMasterViewColumn
          FieldName = 'TaxRate'
          RowIndex = 0
          ColIndex = 18
        end
        object Freight: TdxMasterViewColumn
          FieldName = 'Freight'
          RowIndex = 0
          ColIndex = 19
        end
        object AmountPaid: TdxMasterViewColumn
          FieldName = 'AmountPaid'
          RowIndex = 0
          ColIndex = 20
        end
      end
    end
  end
  object tbCustomer: TTable
    Active = True
    DatabaseName = 'DBDEMOS'
    FieldDefs = <
      item
        Name = 'CustNo'
        DataType = ftFloat
        Precision = 0
        Required = False
        Size = 0
      end
      item
        Name = 'Company'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 30
      end
      item
        Name = 'Addr1'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 30
      end
      item
        Name = 'Addr2'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 30
      end
      item
        Name = 'City'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 15
      end
      item
        Name = 'State'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 20
      end
      item
        Name = 'Zip'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 10
      end
      item
        Name = 'Country'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 20
      end
      item
        Name = 'Phone'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 15
      end
      item
        Name = 'FAX'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 15
      end
      item
        Name = 'TaxRate'
        DataType = ftFloat
        Precision = 0
        Required = False
        Size = 0
      end
      item
        Name = 'Contact'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 20
      end
      item
        Name = 'LastInvoiceDate'
        DataType = ftDateTime
        Precision = 0
        Required = False
        Size = 0
      end>
    StoreDefs = True
    TableName = 'customer.db'
    Left = 16
    Top = 104
  end
  object dsCustomer: TDataSource
    DataSet = tbCustomer
    Left = 48
    Top = 104
  end
  object tbOrders: TTable
    Active = True
    DatabaseName = 'DBDEMOS'
    FieldDefs = <
      item
        Name = 'OrderNo'
        DataType = ftFloat
        Precision = 0
        Required = False
        Size = 0
      end
      item
        Name = 'CustNo'
        DataType = ftFloat
        Precision = 0
        Required = True
        Size = 0
      end
      item
        Name = 'SaleDate'
        DataType = ftDateTime
        Precision = 0
        Required = False
        Size = 0
      end
      item
        Name = 'ShipDate'
        DataType = ftDateTime
        Precision = 0
        Required = False
        Size = 0
      end
      item
        Name = 'EmpNo'
        DataType = ftInteger
        Precision = 0
        Required = True
        Size = 0
      end
      item
        Name = 'ShipToContact'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 20
      end
      item
        Name = 'ShipToAddr1'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 30
      end
      item
        Name = 'ShipToAddr2'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 30
      end
      item
        Name = 'ShipToCity'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 15
      end
      item
        Name = 'ShipToState'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 20
      end
      item
        Name = 'ShipToZip'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 10
      end
      item
        Name = 'ShipToCountry'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 20
      end
      item
        Name = 'ShipToPhone'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 15
      end
      item
        Name = 'ShipVIA'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 7
      end
      item
        Name = 'PO'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 15
      end
      item
        Name = 'Terms'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 6
      end
      item
        Name = 'PaymentMethod'
        DataType = ftString
        Precision = 0
        Required = False
        Size = 7
      end
      item
        Name = 'ItemsTotal'
        DataType = ftCurrency
        Precision = 0
        Required = False
        Size = 0
      end
      item
        Name = 'TaxRate'
        DataType = ftFloat
        Precision = 0
        Required = False
        Size = 0
      end
      item
        Name = 'Freight'
        DataType = ftCurrency
        Precision = 0
        Required = False
        Size = 0
      end
      item
        Name = 'AmountPaid'
        DataType = ftCurrency
        Precision = 0
        Required = False
        Size = 0
      end>
    IndexDefs = <
      item
        Options = [ixPrimary, ixUnique]
        Fields = 'OrderNo'
      end
      item
        Name = 'CustNo'
        Options = []
        Fields = 'CustNo'
      end>
    IndexFieldNames = 'CustNo'
    StoreDefs = True
    TableName = 'orders.db'
    Left = 16
    Top = 136
  end
  object dsOrders: TDataSource
    DataSet = tbOrders
    Left = 48
    Top = 136
  end
  object ColorDialog: TColorDialog
    Ctl3D = True
    Options = [cdFullOpen]
    Left = 16
    Top = 168
  end
  object FontDialog: TFontDialog
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Left = 48
    Top = 168
  end
end