Eventhandler zur Laufzeit hinzufügen

[karma]

Hallo,
ich programmiere gerade eine kleine Anwendung mit der FTP-Komponente von Indy. Leider kann ich mit Turbo Delphi Explorer diese nur zur Laufzeit erstellen. Ist ansich kein Problem, allerdings habe ich leider keine Ahnung, wie ich die Event-Proceduren definieren muss und diese zuweise. Könnt ihr mir da einen Tipp geben?

Vielen Dank!

[Florian Hämmerle]

Gleiche Parameteranzahl vom Gleichen Typ.

Delphi-Quellcode:

  ....On.. := MyProc(...);

mfg Flö

[karma]

Danke für deine Antwort!

Mal mein Code:

Delphi-Quellcode:

procedure ftpOnDisconnected(Sender: TObject);
begin
  showmessage('Verbindung zum FTP Server unterbrochen.');
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
ftpclient:=TidFTP.Create(application);
ftpclient.Username:='abc';
ftpclient.Password:='abc';
ftpclient.Host:='localhost';
ftpclient.Connect;
ftpclient.TransferType:=ftBinary;
ftpclient.Passive:=true;
ftpclient.OnDisconnected:=ftpOnDisconnected;
end;

Leider bekomme ich den Fehler "Inkompatible Typen: 'Methodenzeiger und reguläre Prozedur'"

[DeddyH]

Delphi-Quellcode:

procedure TForm1.ftpOnDisconnected(Sender: TObject); //TForm1 davor
begin
  showmessage('Verbindung zum FTP Server unterbrochen.');
end;

Im interface-Teil dann im private-Abschnitt der Form

Delphi-Quellcode:

procedure ftpOnDisconnected(Sender: TObject);

einfügen.