Hallo zusammen,
erstmal vorab, ich bin neu hier und würde euch bitten mich darauf hinzuweisen wenn ich irgendetwas unklar definiere oder mein Quellcode im Forum nicht gut lesbar erscheint. Danke !
Nun zu meiner Situation:
Ich erstelle zur Laufzeit n- Threads die Parallel eine "Arbeit" verrichten. Ich möchte das Event "OnTerminate" aller Threads mit einer Methode aus meinem Hauptprogramm "überschreiben". Also quasi alle Threads nach Beendigung ihrer Arbeit diese Methode aufrufen lassen in der ich dann prüfe ob alle fertig sind usw. .
Meine Frage, wie definiere ich im Hauptprogramm diese Methode mit der ich das Thread.OnTerminate Event "überschreiben" kann?
Delphi-Quellcode:
TMain = class(TForm)
private
procedure ThreadErstellen;
procedure MeineMethode(Sender: TObject);
public
end;
procedure TMain.ThreadErstellen;
begin
Thread1 := TThread.Create(True);
Thread1.OnTerminate := MeineMethode;
end;
procedure TMain.MeineMethode;
begin
//Anweisung
end;
Ich erhalte die Fehlermeldung "Inkompatible Typen: Liste der Parameter ist unterschiedlich".
Danke schonmal an alle!