SysUtils.DirectoryExists

[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) .

[H.Bothur]

Zitat von taveuni:

Was steht denn in der Variable Arbeitsverzeichnis wenn Du Dir das mal mit dem Debugger ansiehst? Oder/und gib im "Fehlerfall" das nicht gefundene Verzeichnis in die Ausgabe mit.

Im Debugger kann ich es leider nicht testen da der Fehler bei einem Freund und nicht bei mir auftritt. Bei mir klappt alles.
Das mit der Ausgabe des Fehlers ist ne Idee - das teste ich mal aus.

Danke
Hans

[H.Bothur]

Zitat von peterbelow:

Warum montierst Du noch ein '\' an den Namen? Das ist definiv falsch, der Backslash ist ein Pfadtrenner, nicht Teil des Namens!

Ich bin - sorry - immer davon ausgegangen das es sonst als Datei gesucht wird ...

also

c:\test\abc -> Datei
c:\test\abc\ -> Pfad

ich weiß nicht ob das evtl. sogar mal so war - auf alle Fälle klapt bei SysUtils.DirectoryExists beides.

Gruss
Hans

[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.

[Frickler]

Zitat von himitsu:

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

TFile.Exists() macht nichts anderes, als SysUtils.FileExists() aufzurufen und TDirectory.Exists() ruft SysUtils.DirectoryExists() auf.

[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