Vielleicht eine zweite Schleife rein? Mal sehen.
Entweder das, oder:
Warum überhaupt eine for-Schleife mit einem hohen Zahlenwert als Abbruchbedingung statt einer while- oder repeat-until-Schleife?
Du meinst eine Endlossschleife? Ja, das stimmt eigentlich. Ok
Dalai, danke,
Wenn ich das Caption rauslasse kann ich ESC drücken und das Form sofort schließen.
Delphi-Quellcode:
procedure TForm1.EndlossSchleife;
var
i:integer;
begin
ResetEscPressed;
while i <= 100000000 do
begin
Application.ProcessMessages;
if EscPressed('Schleife abbrechen ?') then break;
end;
Label1.Caption:= 'stop';
end;
Wenn ich jetzt ein 'Caption:=inttostr(i);' einfüge, kann ich auch das Form sofort schliesen.
Erst wenn ich jetzt ein 'inc(i)' reintue, habe ich wieder das Problem