Beenden meines Delphi Programms während einer For Schleife

[Matze]

Überprüfe nicht auf = true und = false, sondern mach es so:

Delphi-Quellcode:

if foo then
// ...
if not foo then

Mittels break (F1 drücken!) verlässt man eine Schleife. Bei dir könnte das also so aussehen:

Delphi-Quellcode:

for t := 1 to 20 do 
begin
  if exit_program then break;
  // ...
end;

exit_program wäre hier eine boolsche Variable, die zu beginn auf false steht und im OnClose auf true gesetzt wird.

Evtl. muss du die Funktion "Pause" auch mit einer Abbruchbedingung versehen, je nach dem, was alles diese Verzögerung verursacht.