FileExists aber FolderExists gibts nicht?

[Seikilos]

Naja, ich glaub ich wusste das mal, leider hat mir aber suchen auch nix gebracht, aber welche Befehl dient zum Überprüfen von gültigen Ordnern, wenn ich z.b. c:\Windows angebe, wie prüf ich , ob es ihn gibt?

[janjan]

Probiers mal mit

Delphi-Quellcode:

DirectoryExists

[Seikilos]

Ich dummbacke, das wars.
Hab nach Folder, nach Ordner aber nicht nach Directory gesucht.
AUA.

Danke!

[Christian Seehase]

Moin Seikilos,

da ich schon mal auf das Problem gestossen bin, dass die Implementierung von DirectoryExists aus D5 unter Windows ME nicht so recht funktioniert hat (warum auch immer), hier noch einmal eine Variante die auch die's auch da tut:

Delphi-Quellcode:

function DirectoryExists(const AsDir : string) : boolean;

var
  dwAttr : DWORD;

begin
  result := false;
  dwAttr := GetFileAttributes(PChar(AsDir));
  if dwAttr = DWORD(-1) then
  begin
    exit;
  end;
  result := (dwAttr and FILE_ATTRIBUTE_DIRECTORY) = FILE_ATTRIBUTE_DIRECTORY;
end;

[Daniel B]

Moin Christian,

Zitat:

Zitat von Christian Seehase

da ich schon mal auf das Problem gestossen bin, dass die Implementierung von DirectoryExists aus D5 unter Windows ME nicht so recht funktioniert hat (warum auch immer)

Aber das ging ja bei D6 gell?!?

Grüsse, Daniel :hi:

[Christian Seehase]

Moin Daniel,

das weiss ich jetzt auch nicht mehr genau.
Da Seikilos allerdings keine Delphi Version angegeben hat, fand ich's ganz sinnvoll darauf hinzuweisen ;-)