| Class TForm1 (unit TestCalcelLoadu) |
TForm
| Constructors |
| Functions |
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure Image1Progress(Sender: TObject; Stage: TProgressStage;
PercentDone: Byte; RedrawNow: Boolean; const R: TRect;
const Msg: String);| Properties |
| Events |
| Variables |
Button1 : TButton;
Button2 : TButton;
Image1 : TImage;
OpenDialog1 : TOpenDialog;
ProgressBar1 : TProgressBar;
bCancel : Boolean;| Constructors |
| Functions |
procedure Button1Click(Sender: TObject);Raise silent exception
procedure Button2Click(Sender: TObject);try / finally
procedure FormCreate(Sender: TObject);
procedure Image1Progress(Sender: TObject; Stage: TProgressStage;
PercentDone: Byte; RedrawNow: Boolean; const R: TRect;
const Msg: String);| Properties |
| Events |
| Variables |
Button1 : TButton;
Button2 : TButton;
Image1 : TImage;
OpenDialog1 : TOpenDialog;
ProgressBar1 : TProgressBar;
bCancel : Boolean;Public declarations