Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.631 Beiträge
Delphi 12 Athens
|
Re: Auf Windowsordnerstruktur zugreifen
7. Mär 2010, 14:16
Ich hab das eher andersherum verstanden. Die Verzeichnisliste existiert bereits und die darin enthaltenen Verzeichnisse sollen ggf. angelegt werden.
Delphi-Quellcode:
var Verz: string;
begin
for i := 0 to Namensliste.Count - 1 do
begin
Verz := IncludeTrailingPathDelimiter(angegebenes_Verzeichnis) + Namensliste[i];
if not (DirectoryExists(Verz) or ForceDirectories(Verz)) then
ShowMessage(Format('Verzeichnis "%s" kann nicht angelegt werden',[Verz]));
end;
end;
Detlef "Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|