Class TForm1 (unit ViewMain)

Inherits from

TForm

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;



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;