Zitat von
DeddyH:
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;
Ah ok jetzt verstehe ich das. Danke. Muss das Zeichen am Ende des Strings unbedingt sein oder warum nutzt du IncludeTrailingPathDelimiter? Und: macht der in dieser Schreibweise automatisch Forcedirectories wenn DirectoryExcists false ist?