Forum: Win32/Win64 API (native code)
Delphi
by ChrisE,
13. Jan 2010
@ himitsu
Du bist der Crack :-)
Hab ich angepasst. THX
Forum: Win32/Win64 API (native code)
Delphi
by ChrisE,
13. Jan 2010
Hab ich in meinem Verbesserungsvorschlag angepasst. THX.
Forum: Win32/Win64 API (native code)
Delphi
by ChrisE,
13. Jan 2010
Es scheint zu funktionieren, aber besser wäre sicher
if (SR.Attr and faDirectory) <> faDirectory then
Da stimme ich dir zu.
Greez, Chris
Forum: Win32/Win64 API (native code)
Delphi
by ChrisE,
13. Jan 2010
Hallo Moony,
Über das Netzwerk ist es tatsächlich so, dass die Zeiten deutlich länger sind als auf Lokalen Festplatten des Rechners.
Deinen Algo würde ich erstmal so anpassen wie auch schon von anderen vorgeschlagen:
procedure ListFiles(Path, Ext: string; FileList: TStrings; Attr: integer);
var
SR : TSearchRec;
Forum: Win32/Win64 API (native code)
Delphi
by ChrisE,
12. Jan 2010
Hallo,
wo suchst du die Dateien? Lokal auf der Festplatte oder im Netzwerk?
Welches Betriebssystem verwendest du?
Wenn du mehrfach im selben Verzeichnis suchst, ändert sich die Zeit?
Befinden sich andere Dateien in dem Verzeichnis, die die Suchkriterien nicht erfüllen (z.B. andere Dateiendung)
Das sind so die Kriterien, nach den ich diese Suchalgorithmen angepackt habe.
Aber es ist...