SysUtils.DirectoryExists

[PaPaNi]

Wenn ich "\" am Ende des Pfades brauche, dann würde ich das mittels der Funktion IncludeTrailingPathDelimiter hinzufügen.

[himitsu]

Zitat von PaPaNi:

Wenn ich "\" am Ende des Pfades brauche, dann würde ich das mittels der Funktion IncludeTrailingPathDelimiter hinzufügen.

Oder Zusammenbauen ala A + '\' + B mittels TPath.Combine(A, B) .

[PaPaNi]

Zitat von himitsu:

Zitat von PaPaNi:

Wenn ich "\" am Ende des Pfades brauche, dann würde ich das mittels der Funktion IncludeTrailingPathDelimiter hinzufügen.

Oder Zusammenbauen ala A + '\' + B mittels TPath.Combine(A, B) .

Das garantiert aber nicht, dass es am Ende das Zeichen "\" steht. Oder verstehe ich was falsch?

[Benmik]

Nee, tut es nicht, außer B endet mit einem "\".
Himitsu ging davon aus, dass du den "\" anhängen willst, weil danach noch ein weiterer Pfadbestandteil folgen soll. Du willst es aber, um dem System deutlich zu machen, dass du ein Verzeichnis meinst und nicht eine Datei. Das konnte Himitsu nicht wissen.

[himitsu]

Nee, genauso wie man zum Anhängen oder Entfernen eine Funktion hat,
gibt es seit einer kürzeren Weile auch eine Funktion für das Zusammenbauen.


Selbst manuell gebaut kommt es noch besser, wenn man die Konstante benutzt, anstatt dem selbstgeschriebenen.

Windows entfernt überzählige Trenner, wie z.B. den Letzten im Pfad (aber nie den Ersten, also den nach einem :) oder Doppelte mittendrin.
Denn der Erste folgt nicht auf das X: sondern leitet den "absoluten" Pfad innerhalb des Laufwerks ein.

Linux, Mac oder Android reagieren dagegen allergischer auf "Mist".


Ein Pfad Endet niemals mit einem.
Der Pfad, bzw. das Verzeichnis, ist der "letzte" Name. (Unterschied macht ausschließlich das Dateiattribut)



Bei "Pfaden" hatte sich nur Einfas eingebürgert, aber leider ist es keine Vorschrift.
z.B.
* TempFile ist ein temporärer Dateiname, aber nicht gesagt ob mit oder ohne Verzeichnis
* TempDir ist das temporäre Verzeichnis, ohne \
* TempPath ist das temporäre Verzeichnis mit \ , damit man direkt einen Dateinamen anhängen kann

[Benmik]

Die API DeleteFile und damit auch TDirectory.Delete funktionieren sogar nicht, wenn ein "\" am Ende steht.

Ich muss aber auch gestehen, dass ich ein Verzeichnis meist mit "\" abschließe. Ich meine, das kommt noch aus den DOS-Zeiten, als der Prompt manchmal nachfragte, ob man eine Datei oder ein Verzeichnis meint.

[himitsu]

Im FinalBuilder nehme ich auch manchmal \

Es gibt Funktionen, die Dateien und/oder Verzeichnisse löschen.
Bzw. in Acktionen zum Kopieren von Einzeldateien.
* mehrere Dateien (also inkl. Maske) da ist das Ziel immer das Verzeichnis
* bei Einzeldatei ist es mit \ immer ein Verzeichnis und der Dateiname wird beibehalten
* bei Einzeldatei ohne \ im Ziel muß man aufpassen unten die Checkbox nicht zu vergessen
* * dort kann das Ziel als "Kopieren mit neuem Namen" angesehn werden

[H.Bothur]

Zitat von PaPaNi:

Wenn ich "\" am Ende des Pfades brauche, dann würde ich das mittels der Funktion IncludeTrailingPathDelimiter hinzufügen.

Warum ? Ein +'/' geht doch genauso, oder ?

Hans

[himitsu]

Es kann gehn, aber muß nicht.

C:\ ist auch was Anderes als C:\test\

Denn C: ist relativ zum aktuellen Arbeitsverzeichnis dieses Laufwerks.



Ja, der Syntax nach könnte man es so sehn

c:\test\abc -> Datei oder Verzeichnis (je nach Attribut)

c:\test\abc -> Directory
c:\test\abc\ -> Path
c:\test\abc\. -> ParentDirecrory to Self

Achtung: FileExists prüft auf Datei oder Verzeichnis (wenn das Verzeichnis nicht gesperrt ist, sonst wird nochmal mit CreateFile versucht und das schlägt beim Verzeichnis meistens fehl, normal wegen fehlender Backup-Berechtigung)
TFile.Exists aber nur auf Datei -> TDirectory.Exists für Verzeichnis

[KodeZwerg]

Oder wenn man es ohne SysUtils in sehr kleinen non-Vcl Anwendungen braucht kann man auch

Code:

function DirectoryExists(const FilePath: string): Boolean;
var
  Attr: Cardinal;
begin
  Attr := GetFileAttributes(PChar(FilePath));
  Result := (Attr <> $FFFFFFFF) and (Attr and FILE_ATTRIBUTE_DIRECTORY <> 0);
end;

das machen.