Methode/Klasse "Modal" aufrufen?

[venice2]

Richtig
Und füge bei FreeAndNil(tmpTel); lieber einen exception Handler ein.

Delphi-Quellcode:

    
except
  on e: Exception do
      ShowMessage(e.Message);

[Uwe Raabe]

Zitat von MorrisF:

Aber das Programm wartet überhaupt nicht.

Dann schauen wir halt mal auf deinen Code.

Delphi-Quellcode:

procedure TCallThread.Execute;
var
  tmpTask: ITask;
begin
  inherited;
  try
    tmpTask := TTask.Create(
      procedure
      begin
        Anruf(CallData);

        while not AnrufFertig do
          tmpTask.Wait();
        WaitFor();
      end
    );
    tmpTask.Start;
  except
    on e: Exception do
      ShowMessage(e.Message);
  end;
end;

Das Execute des Threads erzeugt also eine Task (Inhalt erstmal egal) und startet diese. Die Task wird in einem separaten Thread ausgeführt. Also ist die Execute-Methode damit beendet und wird verlassen. Der Code in der Task wird dann zwar noch in dem anderen Thread ausgeführt, aber der TAnrufThread wird wegen FreeOnTerminate nach dem Verlassen von Execute schon freigegeben.

Daher auch meine Frage

Zitat von Uwe Raabe:

warum die Kombination aus Thread und Task?

Entweder das eine oder das andere, aber nicht beides!

[MorrisF]

Habe grade meine Frage geupdated, weil die Herangehensweise falsch war

[Uwe Raabe]

Zitat von MorrisF:

Habe grade meine Frage geupdated, weil die Herangehensweise falsch war

Das ist nicht so schön, denn damit verlieren alle bisherigen Antworten ihren Kontext. Wenn du also was updatest, dann mach das ein einem eigenen Beitrag und nicht im Eingangspost. So kann man der Historie besser folgen.

Nebenbei: Das Anrufen heißt offenbar jetzt Call.

Frage: Wo wird HangUp aufgerufen bzw. woran erkennst du dass der Call beendet ist?