Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.071 Beiträge
Delphi 12 Athens
|
AW: Thread - warten bis alle Berechnungen fertig
29. Aug 2011, 18:22
Delphi-Quellcode:
procedure TDLT.OnThreadTerminate(Sender: TObject);
begin
if ((Sender = Thread1) and Thread2.Finished) or ((Sender = Thread2) and Thread1.Finished) then
Show;
end;
Bei mehreren Threads kann man das, über eine Schleife, ganz hübsch zusammenfassen.
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.
|