Naja, so wie man halt Messages sendet
1. Du brauchst im Thread das
Handle des Formulars. z.B. indem du ein public-Feld machst, und das Formular tut dann sein
Handle da rein.
2. Nachricht definieren:
const WM_ThreadFinished = WM_USER + 1234;
3. Wenn der Thread fertig ist:
Delphi-Quellcode:
Result := checkSourcecode(Sourcecode);
if not(Result)
begin
Self.Terminate;
PostMessage(FormHandle, WM_ThreadFinished, Integer(Result), 0);
end;
Im Hauptthread kannst du dann eine Methode implementieren, die genau auf diese Nachricht reagiert (message-Direktive) und da dann die Dialogbox darstellen und den Thread neu starten (vorher warten bis der alte abgearbeitet ist)
Alternativ kannst du auch einen neuen Thread kreieren ( halt MyThread = TMyThread.Create() ) und immer Freeonterminate auf true setzen. Dann startest du nicht einen Thread immer neu, sondern kreiert immer neue Threads, die sich nicht ins Gehege kommen. Dann kannst du dir den Message-Kram sparen - das ist definitiv die einfachere Lösung weil man sich um die Freigabe des Threads nicht mehr kümmern muss
