| Class TForm1 (unit ViewMain) |
TForm
| Constructors |
| Functions |
procedure Collapse1Click(Sender: TObject);
procedure Exit1Click(Sender : TObject);
procedure Expand1Click(Sender: TObject);
procedure Open1Click(Sender : TObject);
procedure ExpandNode(Index : integer; S : TStorage);| Properties |
| Events |
| Variables |
Collapse1 : TMenuItem;
Exit1 : TMenuItem;
Expand1 : TMenuItem;
File1 : TMenuItem;
MainMenu1 : TMainMenu;
Open : TOpenDialog;
Open1 : TMenuItem;
Outline : TOutline;
View1 : TMenuItem;| Constructors |
| Functions |
procedure Collapse1Click(Sender: TObject);
procedure Exit1Click(Sender : TObject);
procedure Expand1Click(Sender: TObject);recursive call next
procedure Open1Click(Sender : TObject);
procedure ExpandNode(Index : integer; S : TStorage);Public declarations
| Properties |
| Events |
| Variables |
Collapse1 : TMenuItem;
Exit1 : TMenuItem;
Expand1 : TMenuItem;
File1 : TMenuItem;
MainMenu1 : TMainMenu;
Open : TOpenDialog;
Open1 : TMenuItem;
Outline : TOutline;
View1 : TMenuItem;