Form nach Thread schließen

[youuu]

Ich führe einen TThread aus, sobald dieser abgearbeitet wurde, soll das aktuelle Form schließen.
Wenn ich das im Thread schreibe, erhalte ich logischerweise eine Zugriffsverletzung.

Wie kann ich das aber nun am elegantesten realisieren?

[jfheins]

TThread hat ein OnTerminate Event (oder so) - das verknüpfst du mit einer Methode deines Formulars. Darin kannst du dann einfach Release() aufrufen.

[youuu]

Das versteh ich nun noch nicht ganz.
Mit welcher Methode des Formulars soll ich das denn verknüpfen?
Und wieso Release?

[DeddyH]

Formulare sollten mit Release freigegeben werden. Und die Methode musst Du halt schreiben und zuweisen.

[Bummi]

Delphi-Quellcode:

Procedure TForm.MeineInfoWennThreadFertig(Sender:TObject);
begin
   Close;
end;
//....
//....
Mythread := TMYthread.Create;
MyThread.OnTerminate := MeineInfoWennThreadFertig;
//...

[youuu]

Ok verstanden, danke.

[youuu]

Ich hol den Thread nochmal hoch aus dem Grund, das mein OnTerminate nicht funktionieren will.

Delphi-Quellcode:

EmailSendThread.OnTerminate:= MailVersandt;

Rufe ich auf und erhlate die Meldung beim Compiler: E2009 Inkompatible Typen: 'Liste der Parameter ist unterschiedlich'


MailVersandt hat allerdings gar keine Parameter angegeben.

[DeddyH]

Die zuzuweisende Methode muss ein TNotifyEvent sein, muss/darf also lediglich den Sender-Parameter aufweisen.

[youuu]

Nochmal zum Verständnis

in private deklariert der Klasse:

Delphi-Quellcode:

procedure MailVersandt;

Thread wird so aufgerufen in der Klasse selbst:

Delphi-Quellcode:

      
EmailSendThread:= TEmailSendThread.Create(msg, smtp);
EmailSendThread.OnTerminate:= MailVersandt;
EmailSendThread.Start;

Was muss ich daran ändern?

[DeddyH]

Delphi-Quellcode:

procedure Mailversandt(Sender: TObject);