Class TCreaDirDlg (unit Unit4)

Inherits from

TForm

Constructors



Functions

procedure FormShow(Sender: TObject);


procedure OKBtnClick(Sender: TObject);


Properties

Events

Variables

CancelBtn : TBitBtn;


Edit1 : TEdit;


Label1 : TLabel;


OKBtn : TBitBtn;


Directory : string;

Public declarations


Constructors


Functions


procedure FormShow(Sender: TObject);


procedure OKBtnClick(Sender: TObject);


Properties


Events


Variables


CancelBtn : TBitBtn;


Edit1 : TEdit;


Label1 : TLabel;


OKBtn : TBitBtn;


Directory : string;

Public declarations