Abbrechen und auf Abbruch warten?

[Ines]

Hallo Georg,

benötigst Du wirklich diese Unmenge von application.processmessages?
Ich glaube beim 2. Button sind die überflüssig.

Delphi-Quellcode:

Button2:
  abgebrochen:=false; 
  abbruch:=true; 
  application.ProcessMessages;

Button1:
      if Abbruch then begin 
        abgebrochen:=true; 
        break; 
      end; 

Button2:
while not abgebrochen do begin 
    label1.caption:=inttostr(i); 
    inc(i); 
    application.ProcessMessages; 
  end; 
end;

Aus diesem Grund gibt es keine Ausgabe, da abgebrochen in Button1 auf "true" gesetzt wird.
Viele Grüße
Ines