Einzelnen Beitrag anzeigen

jbg

Registriert seit: 12. Jun 2002
3.483 Beiträge
 
Delphi 10.1 Berlin Professional
 
#8

AW: schnelle Alternative für FileExists()

  Alt 3. Jul 2013, 11:49
FindFirst aus SysUtils ist schneller
Aber nur in der Wunschvorstellung. Denn FindFirst ruft wieder FindFirstFile auf. Schneller als GetFileAttribute geht es nicht aus dem User-Space heraus. GetFileAttribute wird dann langsam wenn kein FAST I/O genutzt werden kann, da es dann auf eine langsamere Methode zurückfällt.

Wenn auf mehrere Dateien im gleichen Ordner (vor allem über eine Netzwerkfreigabe) zugegriffen werden soll, dann wäre es schneller mit FindFirstFile+FindNextFile alle Dateinamen des Ordners einzulesen und dann über eine Hash-Tabelle das FileExists abzubilden. Das setzt natürlich voraus, dass während der Abfragen nicht Dateien hinzukommen oder entfernt werden. So arbeitet z.B. der Delphi Compiler (mit IDEFixPack Plugin). Anstatt abertausender GetFileAttribute Aufrufe macht er einmalig für alle Bibliothekspfade ein FindFirstFile+FindNextFile und greift dann nur noch auf seinen Cache (Hash-Tabelle) zu.
  Mit Zitat antworten Zitat