Hinsichtlich der ersten beiden Atworten sieht mein script jetzt erstmal so aus:
Delphi-Quellcode:
i := 1;
while FileExists('save_files\Labyrinth_'+IntToStr(i)+'.txt') do inc(i);
SaveDialog1.FileName := 'Labyrinth_'+IntToStr(i)+'.txt';
if SaveDialog1.Execute then Memo1.Lines.SaveToFile(SaveDialog1.FileName);
> wie meinst du mit dem NoChangeDir?, bin noch sehr neu in Delphi
...also wenn ich einfach
SaveDialog1.NoChangeDir := true;
schreibe, bekomm ich einen Fehler:
Undefinierter Bezeichner: 'NoChangeDir' (kann das daran liegen, das es den Befehl bei Delphi 3 noch nicht gibt?)
> und mit dem relativen Pfad,...
Ich finde das so viel praktischer, weil das dann nicht davon abhängt, wo sich die Datei befindet.
[edit=Sharky]Noch einmal Delphi-Tags eingefügt. Bitte mache das bei deinen nächsten Postings selber. Danke. Mfg, Sharky[/edit]