| Class TCreaDirDlg (unit Unit4) |
TForm
| Constructors |
| Functions |
procedure FormShow(Sender: TObject);
procedure OKBtnClick(Sender: TObject);| Properties |
| Events |
| Variables |
CancelBtn : TBitBtn;
Edit1 : TEdit;
Label1 : TLabel;
OKBtn : TBitBtn;
Directory : string;| 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