Ordner automatisch erstellen?

[Marco Haffner]

Zitat von Brüggendiek:

Hallo!

Noch kürzer ist:

Delphi-Quellcode:

procedure TForm1.ButtonClick(Sender: TObject);
begin
  ForceDirectories('C:\irgendwas\ass\fjk\');
  Memo1.Lines.SaveToFile('C:\irgendwas\ass\fjk\' + 'Dateinamen.txt');
end;

(den '\' zwischen Verzeichnis und Dateimanen nicht vergessen, gelle!)
...
...
Persönlich schreibe ich bei sowas übrigen immer so:
const verzeichnis = 'C:\irgendwas\ass\fjk\';

Stimmt, Delphi überprüft es ja selbst... wenn man halt nicht am eigenen Rechner sitzt.
Ja im Eifer des Gefechts kann man auch mal etwas übersehen.
Besonders wenn man klau... ähh, kopiert.
Ich bevorzuge es auch Ordner oder Dateinamen nur einmal anzugeben, aber wie schon gesagt...