Hallo, Du "müder"
Nur ein Tip von mir, da ich Deine Frage nicht richtig verstehe. Unter NT und XP, bei verwendung von NTFS, gibt es erweiterte Datei-Attribute. Komprimierte Dateien und Ordner haben dann eben diese erweiterte Attribute.
Um alle Dateien in normalen und komprimierten Ordenern oder Verzeichnissen anzuzeigen, benutze ich folgendes in der FindFile-Routine:
const
MyKompFile = $00000800; // komprimiert
MyNormFile = $0000080; // normal
und in der Routine dann:
Begin
FileAttrs := FileAttrs + MyNormFile;
if FindFirst(-Verzeichnis- + '\*.*', FileAttrs, sr) = 0 then
begin
...
end;
end;
Gruß
Jochen