Delphi FindFirstFile NIL übergeben?

Thema durchsuchen

Ansicht

Themen-Optionen

FindFirstFile NIL übergeben?

Ein Thema von Pseudemys Nelsoni · begonnen am 28. Jun 2004 · letzter Beitrag vom 28. Jun 2004

Vorheriger Beitrag

Nächster Beitrag

MathiasSimmack

(Gast)

n/a Beiträge

Re: FindFirstFile NIL übergeben?

28. Jun 2004, 15:23

So ähnlich sieht die Funktion bei Borland aus:

markieren

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;