Nummer der Datei um 1 erhöhen

[AnfängerDelphi]

Hallo Sir Rufo,

richtig,meine Frage wurde schon beantwortet.
Ich habe nur die Prozedur vervollständigt,wie es gewünscht wurde.

Zitat:

(ok, evtl. eine Zeitschleife gegen Timingprobleme)

Also eine Zeitverzögerung einbauen und das inc(vListe); weglassen?
Sowas in dieser Art z.B.:

Delphi-Quellcode:

procedure pause(zeit:longint);
var zeit1:longint;
begin
  zeit1:=GetTickCount;
  repeat
        application.ProcessMessages;
  until (GetTickCount-zeit1 > zeit);
end;

Mfg

AnfängerDelphi