Eine andere Möglichkeit wäre etwa
Delphi-Quellcode:
for i:=0 to counter do begin
if i and $0F= 0 then application.processmessages;
....
{ hier wird gearbeitet}
.....
end;
wobei processmessages z.B. natürlich auch Clicks auf Buttons verarbeitet, was dann "ChaosMultitasking" auslöst.
Gruß
K-H