object frmVTPropEdit: TfrmVTPropEdit
  Left = 523
  Height = 601
  Top = 305
  Width = 458
  HorzScrollBar.Page = 457
  VertScrollBar.Page = 600
  ActiveControl = VT
  Caption = 'Property Editor'
  Font.Height = -11
  Font.Name = 'Tahoma'
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  Position = poDefaultPosOnly
  object Panel1: TPanel
    Height = 601
    Width = 458
    Align = alClient
    BevelOuter = bvNone
    BorderWidth = 7
    Caption = 'Panel1'
    TabOrder = 0
    object VT: TVirtualStringTree
      Left = 7
      Height = 531
      Top = 32
      Width = 444
      Align = alClient
      CheckImageKind = ckXP
      Color = 15921906
      Colors.BorderColor = clWindowText
      Colors.HotColor = clBlack
      Header.AutoSizeIndex = 1
      Header.Font.Height = -11
      Header.Font.Name = 'MS Sans Serif'
      Header.Height = 18
      Header.Options = [hoAutoResize, hoColumnResize, hoVisible]
      Header.Style = hsPlates
      HintAnimation = hatFade
      HintMode = hmHint
      IncrementalSearch = isAll
      IncrementalSearchTimeout = 500
      Indent = 12
      LineStyle = lsCustomStyle
      Margin = 0
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      TextMargin = 3
      TreeOptions.AnimationOptions = [toAnimatedToggle]
      TreeOptions.AutoOptions = [toAutoDropExpand, toAutoTristateTracking, toAutoDeleteMovedNodes]
      TreeOptions.MiscOptions = [toAcceptOLEDrop, toEditable, toInitOnSave, toToggleOnDblClick, toWheelPanning]
      TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toShowHorzGridLines, toShowRoot, toShowVertGridLines, toThemeAware, toUseBlendedImages]
      TreeOptions.SelectionOptions = [toExtendedFocus]
      OnChange = VTChange
      OnCreateEditor = VTCreateEditor
      OnEditing = VTEditing
      OnGetText = VTGetText
      OnPaintText = VTPaintText
      OnGetNodeDataSize = VTGetNodeDataSize
      OnInitChildren = VTInitChildren
      OnInitNode = VTInitNode
      Columns = <      
        item
          Width = 186
          WideText = 'Properties'
        end      
        item
          Color = clWhite
          Options = [coAllowClick, coDraggable, coEnabled, coParentBidiMode, coResizable, coShowDropMark, coVisible]
          Position = 1
          Width = 258
          WideText = 'Values'
        end>
    end
    object cmb: TComboBox
      Left = 7
      Height = 21
      Top = 7
      Width = 444
      Align = alTop
      AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
      BorderSpacing.Bottom = 4
      Font.Height = -11
      Font.Name = 'Tahoma'
      ItemHeight = 13
      ItemIndex = 0
      Items.Strings = (
        'Object 1'
        'Object 2'
        'Object 3'
        'Object 4'
        'Object 5'
        'Object 6'
        'Object 7'
        'Object 8'
        'Object 9'
        'Object 10'
      )
      MaxLength = 0
      OnChange = cmbChange
      Style = csDropDownList
      TabOrder = 1
      Text = 'Object 1'
    end
    object panBase: TPanel
      Left = 7
      Height = 31
      Top = 563
      Width = 444
      Align = alBottom
      BevelOuter = bvLowered
      TabOrder = 2
      object chkTriangleButtons: TCheckBox
        Left = 321
        Height = 13
        Top = 8
        Width = 97
        Caption = 'Triangle Buttons'
        OnClick = chkTriangleButtonsClick
        TabOrder = 0
      end
      object btnDynamicallyUpdate: TButton
        Left = 4
        Height = 25
        Top = 3
        Width = 125
        BorderSpacing.InnerBorder = 4
        Caption = 'Dynamically Update'
        OnClick = ShowExample
        TabOrder = 1
      end
    end
  end
  object TreeImages: TImageList
    left = 14
    top = 52
    Bitmap = {
[encoded data, 18034 characters]
      2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E227D0A
    }
  end
end
