mainform.dfm

jvcl driver development envionment

object frmMain: TfrmMain
  Left = 192
  Top = 107
  Width = 521
  Height = 400
  Caption = 'JvCheckTreeView Demo'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label6: TLabel
    Left = 260
    Top = 294
    Width = 113
    Height = 13
    Anchors = [akTop, akRight]
    Caption = 'Cascade Checks when:'
  end
  object Label5: TLabel
    Left = 260
    Top = 246
    Width = 84
    Height = 13
    Anchors = [akTop, akRight]
    Caption = 'Cascade Checks:'
  end
  object Label4: TLabel
    Left = 261
    Top = 162
    Width = 26
    Height = 13
    Anchors = [akTop, akRight]
    Caption = '&Style:'
  end
  object Label3: TLabel
    Left = 261
    Top = 108
    Width = 58
    Height = 13
    Anchors = [akTop, akRight]
    Caption = '&ImageIndex:'
    FocusControl = edImageIndex
  end
  object Label2: TLabel
    Left = 261
    Top = 54
    Width = 56
    Height = 13
    Anchors = [akTop, akRight]
    Caption = '&Node Type:'
    FocusControl = cbNodeType
  end
  object Label1: TLabel
    Left = 261
    Top = 6
    Width = 53
    Height = 13
    Anchors = [akTop, akRight]
    Caption = 'Node &Text:'
    FocusControl = edText
  end
  object udImageIndex: TUpDown
    Left = 396
    Top = 128
    Width = 15
    Height = 21
    Anchors = [akTop, akRight]
    Associate = edImageIndex
    Min = -1
    Position = 0
    TabOrder = 0
    Wrap = False
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 354
    Width = 513
    Height = 19
    Panels = <
      item
        Text = '  Right-click any node in the treeview for more options'
        Width = 50
      end>
    SimplePanel = False
  end
  object JvCheckTreeView1: TJvCheckTreeView
    Left = 0
    Top = 8
    Width = 249
    Height = 339
    Anchors = [akLeft, akTop, akRight, akBottom]
    HideSelection = False
    Images = ilStandard
    Indent = 19
    PopupMenu = popTree
    StateImages = ilChecks
    TabOrder = 2
    OnContextPopup = JvCheckTreeView1ContextPopup
    LineColor = 13160660
    CheckBoxOptions.Style = cbsNone
    OnToggling = JvCheckTreeView1Toggling
    OnToggled = JvCheckTreeView1Toggled
  end
  object edText: TEdit
    Left = 264
    Top = 24
    Width = 145
    Height = 21
    Anchors = [akTop, akRight]
    TabOrder = 3
    Text = 'NodeName'
  end
  object edImageIndex: TEdit
    Left = 264
    Top = 128
    Width = 132
    Height = 21
    Anchors = [akTop, akRight]
    TabOrder = 4
    Text = '0'
  end
  object chkFlat: TCheckBox
    Left = 372
    Top = 210
    Width = 37
    Height = 17
    Anchors = [akTop, akRight]
    Caption = '&Flat'
    TabOrder = 5
    OnClick = chkFlatClick
  end
  object chkChecked: TCheckBox
    Left = 264
    Top = 210
    Width = 97
    Height = 17
    Anchors = [akTop, akRight]
    Caption = 'C&hecked'
    Enabled = False
    TabOrder = 6
  end
  object cbStyle: TComboBox
    Left = 264
    Top = 184
    Width = 145
    Height = 21
    Style = csDropDownList
    Anchors = [akTop, akRight]
    ItemHeight = 13
    TabOrder = 7
    OnChange = cbStyleChange
    Items.Strings = (
      'No checkboxes'
      'MS implementation'
      'JVCL implementation')
  end
  object cbNodeType: TComboBox
    Left = 264
    Top = 72
    Width = 145
    Height = 21
    Style = csDropDownList
    Anchors = [akTop, akRight]
    ItemHeight = 13
    TabOrder = 8
    OnChange = cbNodeTypeChange
    Items.Strings = (
      'Normal'
      'CheckBox'
      'RadioItem')
  end
  object cbCascadeOptions: TComboBox
    Left = 264
    Top = 312
    Width = 145
    Height = 21
    Style = csDropDownList
    Anchors = [akTop, akRight]
    ItemHeight = 13
    TabOrder = 9
    OnChange = cbCascadeOptionsChange
    Items.Strings = (
      'Checking'
      'Unchecking'
      'Unchecking and Checking')
  end
  object cbCascadeLevels: TComboBox
    Left = 264
    Top = 264
    Width = 145
    Height = 21
    Style = csDropDownList
    Anchors = [akTop, akRight]
    ItemHeight = 13
    TabOrder = 10
    OnChange = cbCascadeLevelsChange
    Items.Strings = (
      'Always'
      'Never'
      '1 Level'
      '2 Levels'
      '3 Levels'
      '4 Levels'
      '5 Levels'
      '6 Levels'
      '7 Levels'
      '8 Levels'
      '9 Levels'
      '10 Levels')
  end
  object btnRandom: TButton
    Left = 432
    Top = 88
    Width = 75
    Height = 25
    Anchors = [akTop, akRight]