Class TForm1 (unit testform)

Inherits from

TForm

Constructors



Functions

procedure BrowseBtnClick(Sender: TObject);


procedure CreateBtnClick(Sender: TObject);


procedure QuitBtnClick(Sender: TObject);


Properties

Events

Variables

Bevel1 : TBevel;


BrowseBtn : TButton;


CreateBtn : TButton;


FilenameEdit : TEdit;


Label1 : TLabel;


OpenDialog1 : TOpenDialog;


QuitBtn : TButton;



Constructors


Functions


procedure BrowseBtnClick(Sender: TObject);


procedure CreateBtnClick(Sender: TObject);


procedure QuitBtnClick(Sender: TObject);


Properties


Events


Variables


Bevel1 : TBevel;


BrowseBtn : TButton;


CreateBtn : TButton;


FilenameEdit : TEdit;


Label1 : TLabel;


OpenDialog1 : TOpenDialog;


QuitBtn : TButton;