Delphi-Quellcode:
repeat
Berechne;
Form1.ShowSemiModal;
Form1.WaitForMe;
berechneweiter;
until BefriedigendesErgebnis;
Ja, so programmiere ich auch... Ne Stopp das war noch zu DOS Zeiten...
Seit Borland Pascal für Windows programmiert man aber Event-Orientiert...