Dateiliste - Dateien und Verzeichnisse aussortieren anhand einer StringListe

[Jim Carrey]

Danke für die Hilfe!

ich habe es jetzt so gelöst...
in meiner Datei stehen alle Pfade in absoluter Form. Z.B. D:\Verzeichnis1\*
In meiner Funktion wird nun geprüft, ob das letzte Zeichen ein * ist, wenn ja, wird es entfernt.
Dann wird geprüft, ob es sich um ein Verzeichnis oder um eine Datei handelt.

Und dann

Delphi-Quellcode:

sAktuellerPfad := sl.Strings[i];
if (bIsDirectory and (PosEx(sAktuellerPfad, sMeinPfad, 1) = 1)) or ((not bIsDirectory) and (sAktuellerPfad = sMeinPfad)) then

Wenn in der StringListe steht:

Zitat:

D:\Verzeichnis1\*

Dann wird D:\Verzeichnis1\ und alles was da drin ist aussortiert.

Und

Zitat:

D:\Verzeichnis1\Datei.txt

würde nur diese Datei aussortieren.

Aktuell noch umständlich und schlecht erweiterbar, aber ich gucke mal was sich machen lässt.

Ich prüfe jetzt also jeden Pfad der mit FindFirst gefunden wird mit allen Pfaden aus der StringList.