Benachrichtigung im Haupt-Thread über Thread-Ende?

[PeterPanino]

Ich starte einen Neben-Thread mit:

Delphi-Quellcode:

  LThread := TThread.CreateAnonymousThread(
    procedure
    begin
      // Tu etwas
    end;

Wie kann ich im Haupt-Thread benachrichtigt werden, wenn der LThread beendet ist?

[Uwe Raabe]

Du kannst dem OnTerminate des Threads eine entsprechende Methode zuweisen.

https://docwiki.embarcadero.com/Libr...ad.OnTerminate

[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

[PeterPanino]

Zitat:

Zitat von himitsu (Beitrag 1518110)

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!