Einzelnen Beitrag anzeigen

Benutzerbild von Matze
Matze
(Co-Admin)

Registriert seit: 7. Jul 2003
Ort: Schwabenländle
14.929 Beiträge
 
Turbo Delphi für Win32
 
#4

Re: Verzeichnis erstellen wenn nicht vorhanden

  Alt 13. Jan 2005, 15:58
Handelt es sich nur um einen Ordner, der erstellt werden muss:

Delphi-Quellcode:
if not DirectoryExists(Pfad) then
  CreateDir(Pfad);
Falls es sich um Pfade handelt, wo mehr als ein Ordner erstellt werden muss:

Delphi-Quellcode:
if not DirectoryExists(Pfad) then
  ForceDirectories(Pfad);

Edit: Mist, zu langsam.
  Mit Zitat antworten Zitat