TD2TreeView

type TD2TreeView = class(TD2ScrollBox)

protected

  procedure Notification(); override;

  procedure SetSelected(); virtual;

  procedure ApplyStyle; override;

  procedure FreeStyle; override;

  procedure EnterFocus; override;

  procedure KillFocus; override;

  procedure HScrollChange(); override;

  procedure VScrollChange(); override;

  function GetContentBounds; override;

  procedure UpdateGlobalIndexes;

  procedure ContentAddObject(); override;

  procedure ContentRemoveObject(); override;

  function GetItemRect();

public

  constructor Create(); override;

  destructor Destroy; override;

  function ItemClass; override;

  procedure EndUpdate; override;

  procedure Clear;

  procedure ExpandAll;

  procedure CollapseAll;

  function ItemByPoint();

  function ItemByIndex();

  function ItemByGlobalIndex();

  procedure AddObject(); override;

  procedure MouseDown(); override;

  procedure MouseMove(); override;

  procedure MouseUp(); override;

  procedure KeyDown(); override;

  procedure KeyUp(); override;

  procedure DragOver(); override;

  procedure DragDrop(); override;

  property Count: Integer; [r]

  property GlobalCount: Integer; [r]

  property CountExpanded: Integer; [r]

  property Selected: TD2TreeViewItem; [rw]

  property Items []: TD2TreeViewItem; [r]

published

  property Resource: string;

  property CanFocused: Boolean;

  property DisableFocusEffect: Boolean;

  property TabOrder: TTabOrder;

  property AllowDrag: Boolean; [rw]

  property ItemHeight: Single; [rw]

  property HideSelectionUnfocused: Boolean; [rw]

  property MultiSelect: Boolean; [rw]

  property ShowCheckboxes: Boolean; [rw]

  property Sorted: Boolean; [rw]

  property OnChange: TNotifyEvent; [rw]

  property OnChangeCheck: TNotifyEvent; [rw]

  property OnCompare: TOnCompareTreeViewItemEvent; [rw]

  property OnDragChange: TOnTreeViewDragChange; [rw]

end;

TD2TreeView

TD2ScrollBox

TD2Control

TD2VisualObject

TD2Object

TObject