FileExists/FileDate - Auslesen über Netzwerk langsam

[dGeek]

Ich benutze aktuell folgenden Schnipsel, um das Änderungsdatum einer Datei herauszufinden:

Delphi-Quellcode:

function getFileLastModified(const aFileName: string): TDateTime;
var
 SR: TSearchRec;
begin
 Result := 0;

 try
  FindFirst(aFileName, faAnyFile, SR);
  Result := SR.TimeStamp;
 except
 end;
end;

Die Funktion scheint etwas lahm zu sein, wenn man viele Dateien prüft, die auf einer Festplatte im Netzwerk liegen.
Gibt es da nichts Schnelleres? Speziell wenn aFileName nicht existiert ist das sehr langsam.

Letztendlich bin ich mir nicht sicher, ob es vielleicht doch FileExists() ist, welches über Netzwerk langsam ist.