Componentes.Terceros.DevExpressVCL/official/x.38/ExpressMasterView/Demos/Delphi/RunTimeStyles/main.dfm

object fmMain: TfmMain
  Left = 222
  Top = 156
  Width = 696
  Height = 491
  Caption = 'ExpressMastrView - Runtime 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 MasterView: TdxMasterView
    Left = 0
    Top = 0
    Width = 688
    Height = 376
    Align = alClient
    TabOrder = 0
    object Style1: TdxMasterViewStyle
      Color = 16577485
      AssignedValues = [svColor]
    end
    object Style2: TdxMasterViewStyle
      Color = 8454143
      AssignedValues = [svColor]
    end
    object GroupStyle1: TdxMasterViewStyle
      Color = 12348214
      AssignedValues = [svColor]
    end
    object GroupStyle2: TdxMasterViewStyle
      Color = 13999443
      AssignedValues = [svColor]
    end
    object GroupStyle3: TdxMasterViewStyle
      Color = 14727819
      AssignedValues = [svColor]
    end
    object Level1: TdxMasterViewLevel
      DataSource = DataSource1
      ID = 'OrderNo'
      OptionsCustomize = [locColumnMoving, locColumnHorSizing, locColumnVerSizing, locColumnSorting, locColumnGrouping, locHideColumnOnGrouping, locShowColumnOnUngrouping]
      OptionsView = [lovGrid, lovGridWithPreview, lovGroupByBox, lovHeader, lovOccupyRestSpace]
      OnGetContentStyle = Level1GetContentStyle
      OnGetGroupStyle = Level1GetGroupStyle
      object dxMasterView1Level1OrderNo: TdxMasterViewColumn
        FieldName = 'OrderNo'
        RowIndex = 0
        ColIndex = 0
      end
      object dxMasterView1Level1CustNo: TdxMasterViewColumn
        FieldName = 'CustNo'
        RowIndex = 0
        ColIndex = 1
      end
      object dxMasterView1Level1SaleDate: TdxMasterViewColumn
        FieldName = 'SaleDate'
        RowIndex = 0
        ColIndex = 2
      end
      object dxMasterView1Level1ShipDate: TdxMasterViewColumn
        FieldName = 'ShipDate'
        RowIndex = 0
        ColIndex = 3
      end
      object dxMasterView1Level1EmpNo: TdxMasterViewColumn
        FieldName = 'EmpNo'
        RowIndex = 0
        ColIndex = 4
      end
      object dxMasterView1Level1ShipToContact: TdxMasterViewColumn
        FieldName = 'ShipToContact'
        RowIndex = 0
        ColIndex = 7
      end
      object dxMasterView1Level1ShipToAddr1: TdxMasterViewColumn
        FieldName = 'ShipToAddr1'
        RowIndex = 0
        ColIndex = 8
      end
      object dxMasterView1Level1ShipToAddr2: TdxMasterViewColumn
        FieldName = 'ShipToAddr2'
        RowIndex = 0
        ColIndex = 9
      end
      object dxMasterView1Level1ShipToCity: TdxMasterViewColumn
        FieldName = 'ShipToCity'
        RowIndex = 0
        ColIndex = 10
      end
      object dxMasterView1Level1ShipToState: TdxMasterViewColumn
        FieldName = 'ShipToState'
        RowIndex = 0
        ColIndex = 11
      end
      object dxMasterView1Level1ShipToZip: TdxMasterViewColumn
        FieldName = 'ShipToZip'
        RowIndex = 0
        ColIndex = 12
      end
      object dxMasterView1Level1ShipToCountry: TdxMasterViewColumn
        FieldName = 'ShipToCountry'
        RowIndex = 0
        ColIndex = 13
      end
      object dxMasterView1Level1ShipToPhone: TdxMasterViewColumn
        FieldName = 'ShipToPhone'
        RowIndex = 0
        ColIndex = 14
      end
      object dxMasterView1Level1ShipVIA: TdxMasterViewColumn
        FieldName = 'ShipVIA'
        RowIndex = 0
        ColIndex = 15
      end
      object dxMasterView1Level1PO: TdxMasterViewColumn
        FieldName = 'PO'
        RowIndex = 0
        ColIndex = 16
      end
      object dxMasterView1Level1Terms: TdxMasterViewColumn
        FieldName = 'Terms'
        RowIndex = 0
        ColIndex = 17
      end
      object dxMasterView1Level1PaymentMethod: TdxMasterViewColumn
        FieldName = 'PaymentMethod'
        RowIndex = 0
        ColIndex = 5
      end
      object dxMasterView1Level1ItemsTotal: TdxMasterViewColumn
        FieldName = 'ItemsTotal'
        RowIndex = 0
        ColIndex = 18
      end
      object dxMasterView1Level1TaxRate: TdxMasterViewColumn
        FieldName = 'TaxRate'
        RowIndex = 0
        ColIndex = 19
      end
      object dxMasterView1Level1Freight: TdxMasterViewColumn
        FieldName = 'Freight'
        RowIndex = 0
        ColIndex = 20
      end
      object dxMasterView1Level1AmountPaid: TdxMasterViewColumn
        FieldName = 'AmountPaid'
        RowIndex = 0
        ColIndex = 6
        OnGetContentStyle = dxMasterView1Level1AmountPaidGetContentStyle
      end
    end
  end
  object plBottom: TPanel
    Left = 0
    Top = 376
    Width = 688
    Height = 88
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    object Label1: TLabel
      Left = 8
      Top = 8
      Width = 175
      Height = 13
      Caption = 'The node style will be set depending '
    end
    object Label2: TLabel
      Left = 8
      Top = 24
      Width = 171
      Height = 13
      Caption = 'upon the PaymentMethod meaning  '
    end
    object Label3: TLabel
      Left = 240
      Top = 8
      Width = 203
      Height = 13
      Caption = 'The AmoundPaid column style will be set if '
    end
    object Label4: TLabel
      Left = 240
      Top = 24
      Width = 208
      Height = 13
      Caption = 'its value is more than the predetermined one'
    end
    object GroupBox1: TGroupBox
      Left = 0
      Top = 40
      Width = 225
      Height = 49
      Caption = 'PaymantMethod'
      TabOrder = 0
      object chbPaymantMethod: TCheckBox
        Left = 8
        Top = 20
        Width = 49
        Height = 17
        Caption = 'Apply'
        State = cbChecked
        TabOrder = 0
        OnClick = chbPaymantMethodClick
      end
      object cmbPaymentMethod: TComboBox
        Left = 103
        Top = 15
        Width = 105
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        Items.Strings = (
          'Credit'
          'Check'
          'Visa'
          'COD'
          'MC'
          'AmEx'
          'Cash')
        TabOrder = 1
        OnChange = chbPaymantMethodClick
      end
    end
    object GroupBox2: TGroupBox
      Left = 239
      Top = 40
      Width = 201
      Height = 49
      Caption = 'AmountPaid'
      TabOrder = 1
      object chbAmountPaid: TCheckBox
        Left = 8
        Top = 20
        Width = 97
        Height = 17
        Caption = 'Apply'
        State = cbChecked
        TabOrder = 0
        OnClick = chbPaymantMethodClick
      end
      object sedAmountPaid: TSpinEdit
        Left = 100
        Top = 16
        Width = 93
        Height = 22
        MaxValue = 0
        MinValue = 0
        TabOrder = 1
        Value = 10000
        OnChange = chbPaymantMethodClick
      end
    end
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'DBDEMOS'
    TableName = 'orders.db'
    Left = 528
    Top = 8
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 568
    Top = 8
  end
end