Verzeichnis erstellen wenn nicht vorhanden

[Christian18]

Hallo,

ich will Dateien Kopieren. Der Pfad, wo die Dateien liegen ist gekannt. Der Pfad wo die Dateien hin sollen, kann aus einer Edit komponnente ausgelesen werden. Aber die frage die ich jetzt habe. was ist wenn der benutzer meines Programm ein verzeichnis wählt, dass noch nicht existiert. Kann man das dann erstellen??? Wenn ja wie??? hier mein code den ich bis jetzt habe.


CopyFile(PChar(ExtractFilePath(Application.ExeName ) + 'Daten\Benutzer.db'), PChar(Edit1.Text + 'Benutzer.db'), True);