Wie bekomme ich das OnTerminate-Ereignis hin?
Ich habs mal so versucht
procedure tthread1.beenden;
begin
end;
…
thread1.onterminate := tthread1.beenden;
Hab auch schon dutzende andere Dinge ausprobiert, es
funktioniert aber nicht.
Danke
Mario
Wie bekomme ich das OnTerminate-Ereignis hin?
Ich habs mal so versucht
procedure tthread1.beenden;
begin
end;
…
thread1.onterminate := tthread1.beenden;
Hab auch schon dutzende andere Dinge ausprobiert, es
funktioniert aber nicht.
Danke
Mario
OnTerminate ist ein Ereignis vom Typ TNotifyEvent und daher erwartet einen Parameter „Sender: TObject“. Der Parameter „Sender“ ist das Objekt, dessen Ereignisbehandlungsroutine aufgerufen wird, d.h. dein Prozedure
muß so aussehen:
procedure tthread1.beenden(Sender: TObject);
begin
end;
dann geht’s.
Ramin
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]