Benachrichtigung im Haupt-Thread über Thread-Ende?

[himitsu]

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