[Bug?] Delphi ist zu langsam?

[Sir Rufo]

Zitat von The Riddler:

Übrigens kommt es mir gelegen das der User die Funktion nicht abbrechen kann, weil sonst nichts mehr funktionieren würde wenn die Funktion nicht bis zum Ende ausgeführt werden würde.

Einen Thread kann der User auch nur dann beenden, wenn der Programmierer ihm diese Möglichkeit gibt.

Wenn du mein Beispiel-Programm daran hindern möchtest beendet zu werden, bevor der Thread entsorgt wurde, dann füg doch für das MainForm-Event folgenden Code hinzu:

Delphi-Quellcode:

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  CanClose := Not Assigned( FMyThread );
end;

cu

Oliver