Wie ich vermutet habe, fehlen die Methodendeklaratioenne in der Klasse:
Delphi-Quellcode:
type
TForm1 = class(TForm)
IdHTTP: TIdHTTP;
Button1: TButton;
Edit1: TEdit;
Edit2: TEdit;
SpeedLabel: TLabel;
Status: TLabel;
Progress: TProgressBar;
private
{ Private-Deklarationen }
FTime: Longword; //Beide Variablen werden für die kb/sec anzeige gebraucht
FBytes: Longword; // --"--
public
{ Public-Deklarationen }
procedure IdHTTPWorkBegin(ASender: TObject; AWorkMode: TWorkMode;
...
end;
Außerdem müssen diese mit der entprecheneden Eventproperty verbunden werden.