source: oup/current/FileClasses/_TreeElement.pas@ 581

Last change on this file since 581 was 241, checked in by alloc, 17 years ago
File size: 666 bytes
Line 
1unit _TreeElement;
2interface
3
4
5type
6 TTreeElement = class
7 protected
8 FConnectionID: Integer;
9 function GetChildCount: Integer; virtual; abstract;
10 function GetChild(ID: Integer): TTreeElement; virtual; abstract;
11 function GetCaption: String; virtual; abstract;
12 function GetType: String; virtual; abstract;
13 public
14 property ConnectionID: Integer read FConnectionID;
15 property ChildCount: Integer read GetChildCount;
16 property Child[ID: Integer]: TTreeElement read GetChild;
17 property Caption: String read GetCaption;
18 property VType: String read GetType;
19 end;
20
21implementation
22
23end.
Note: See TracBrowser for help on using the repository browser.