Frage zu Download Code mit idHTTP aus Code-Library

[The Lord]

Hi,

ich wollte den Code ausprobieren, aber ich bekomme eine Masse an Fehlermeldungen. Warum funktioniert das nicht?

Delphi-Quellcode:

procedure THaupt.IdHTTPWorkBegin(ASender: TObject; AWorkMode: TWorkMode;
  AWorkCountMax: Integer);

Hier z.B.: ';' erwartet, aber '.' gefunden

Fehlt eine USES-Anweisung?

Delphi-Quellcode:

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, IdBaseComponent, IdComponent, IdTCPConnection,
  IdTCPClient, IdHTTP, ComCtrls;

Liebe Grüße!

PS:der Beitrag