Du könntest es so machen:
Delphi-Quellcode:
repeat
inc(i); // erhöht i um 1
pfad := ordner + 'screenshot' + IntToStr(i) + '.bmp';
//
screentofile(pfad);
//
Sleep(100); // Die Zahl in der Klammer gibt die Zeit im ms an, die gewartet werden soll
until i = anzahl;
Dabei musst du allerdings bedenken, dass dein Programm dann "eingefroren" ist. Während der Schleife kannst du dein Programm somit nicht mehr ansprechen.
Edit: Da war ich wohl zu langsam, aber wo bitteschön war der rote Kasten...
