Ich hab mal einige Kleinigkeiten verändert.
Die Wichtigsten sind:
- 0 Byte-Dateien werden jetzt ignoriert
- die Hauptsuchprozedur wurde um 'ne Fehlerbehandlung erweitert
(mir ist aufgefallen, das wenn doch mal die Suche durch 'nen Fehler abbricht, man das Programm nicht mehr ordnungsgemäß beenden kann -.-'')
- und die Auswahl des Suchverzeichnisses ist jetzt keine JEDI-Komponente mehr
Ach ja, derzeit werden die Suchergebnisse nach der Suche gelöscht.
Aber man könnte diese Ergebnisse ja noch beibehalten, so daß man dann die angezeigte Liste der Suchergebnisse z.B. über Filter einschränken kann.
Wenn also jemand Ideen hat, wie man diese Liste filtern kann, so möge er/sie mir dieses bitte mitteilen
Zur Verfügung stehen derzeit die folgenden Rohdaten:
Delphi-Quellcode:
Files: Array of Record
Directory: LongInt; // Verzeichnis der Datei
FileName: AnsiString; // Dateiname der zuerst gefundenen Datei
FileSize: LargeInt; // die Dateigröße
SameFiles: Array of Record
Directory: LongInt; // Verzeichnis/Dateiname der anderen
FileName: AnsiString; // Dateien, mit dem selben Dateiinhalt
End;
End;
Als Anhang sind jetzt auch mal die Quellcodes zu finden,
falls mal jemand dort reinschauen möchte.
Aber nicht wundern, da wird ja einiges aus'm UCC verwendet, allerdings hab ich ja vor kurzem den integrierten Memory-Manager verändert und muß jetzt wiedermal einige "Low-Level-Zugriffe" im UCC entsprechend anpassen 