Wenn der Thread die ButtonClick Methode blockieren soll gibt es die Methode TThread.WaitFor(). Die Ausführung des
VCL-Hautpthreads wartet dann ab, bis der Worker-Thread seine Arbeit beendet hat.
Delphi-Quellcode:
procedure Foo;
var MyThread: TMyThread;
begin
MyThread := TMyThread.Create(true);
MyThread.FreeOnTerminate := false;
try
MyThread.Resume;
MyThread.WaitFor;
finally
MyThread.Free;
end;
end;
Hab aber trotzdem das Gefühl, dass das Problem noch nicht gelöst ist. :-/ Ich versteh nicht so ganz, was du mit "synchron laufen" meinst...
Dani H.
At Least I Can Say I Tried