FindFirstFile NIL übergeben?

[mirage228]

Zitat von MathiasSimmack:

So ähnlich sieht die Funktion bei Borland aus:

Delphi-Quellcode:

function fileexists(const szFilename: string): boolean;
var
  Handle   : THandle;
  FindData : TWin32FindData;
begin
  Handle   := FindFirstFile(pchar(szFilename),FindData);
  Result   := (Handle <> INVALID_HANDLE_VALUE);

  if(Result) then Windows.FindClose(Handle);
end;

Funktioniert auch für Ordner.

Hi Mathias,

nicht ganz! Die Funktion von Borland prüft, ob FileAge(FileName) <> -1 ist.

Ich nehme aber an, dass das (bei Dateien zumindest) keinen Unterschied macht.

mfG
mirage228