| Class TWaitForm (unit Wait) |
TForm
| Constructors |
| Functions |
procedure BitBtn1Click(Sender: TObject);
procedure BitBtn2Click(Sender: TObject);
procedure Timer1Timer(Sender: TObject);
procedure BeginWait;| Properties |
| Events |
| Variables |
BitBtn1 : TBitBtn;
ElapLab : TLabel;
Label1 : TLabel;
Label2 : TLabel;
ProcLab : TLabel;
Timer1 : TTimer;
hProc : THandle;
Start : double;| Constructors |
| Functions |
procedure BitBtn1Click(Sender: TObject);
procedure BitBtn2Click(Sender: TObject);
procedure Timer1Timer(Sender: TObject);
procedure BeginWait;| Properties |
| Events |
| Variables |
BitBtn1 : TBitBtn;
ElapLab : TLabel;
Label1 : TLabel;
Label2 : TLabel;
ProcLab : TLabel;
Timer1 : TTimer;
hProc : THandle;Public declarations
Start : double;