Registriert seit: 4. Sep 2004
1.465 Beiträge
Delphi 10.4 Sydney
|
AW: Benachrichtigung im Haupt-Thread über Thread-Ende?
31. Jan 2023, 21:34
Oder z.B. mit try-finally, in der Prozedur, am Ende deine Rückantwort.
PS, bei dir kommt dort nie eine Antwort, falls da nicht nicht noch ein Start kommt.
Delphi-Quellcode:
LThread := TThread.CreateAnonymousThread(
procedure
begin
// Tu etwas
end);
LThread.OnTerminate := BinFertigEreignis;
LThread.Start;
Delphi-Quellcode:
TThread.CreateAnonymousThread(
procedure
begin
try
// Tu etwas
finally
BinFertigEreignis;
end
end).Start;
Delphi-Quellcode:
LThread := TThread.CreateAnonymousThread(
procedure
begin
// Tu etwas
end);
LThread.FreeOnTerminate := False;
LThread.Start;
// und dann kannst du nachfolgend
if LThread.Finished then // oder .WaitFor oder was mit .Handle
// und natürlich zum Schluß LThread.Free nicht vergessen
Danke - das ist sehr hilfreich!
Geändert von PeterPanino, damit der Platz auf dem Bildschirm nicht so leer aussieht.
|