Forum: Object-Pascal / Delphi-Language
Delphi
by N30N,
25. Okt 2007
Das scheint mir ganz logisch zu sein, danke schonmal. Aber wozu dient das "procedure DoIt;" unter der Variablendeklaration?
var
bFileFound: boolean;
i: Integer;
begin
bFileFound := false;
i := 0;
repeat
Forum: Object-Pascal / Delphi-Language
Delphi
by N30N,
25. Okt 2007
Also wenn ich den Delphi-Hilfe Text richtig verstanden habe, dann dient Findfirst / Findnext dazu, um Dateien zu finden. Aber ich suche ja ne einen freien Dateinamen.
Jedenfalls bekomm ich es so nicht gebacken :/
Forum: Object-Pascal / Delphi-Language
Delphi
by N30N,
25. Okt 2007
Hi,
Ich habe in meinem Verzeichniss Dateien mit dem Namen 1.txt,2.txt etc. liegen. Mit meinem Code versuche ich, einen Dateinamen zu finden, der noch nicht vergeben ist.
var
i : integer;
begin
for i := 1 to 100 do
begin
if fileexists ('c:\' + inttostr(i) + '.txt') then