NTFS-Komprimierung einer einzelnen Datei?

[PeterPanino]

Hallo und schönes Wochenende!

Ich wollte mit TFile.SetAttributes das Dateiattribut faCompressed einer einzelnen Datei setzen, aber es funktionierte nicht.

Dann las ich:

Zitat:

It is not possible to change the compression status of a File object using the SetAttributes method.

So versuchte ich in der cmd-Konsole:

Code:

compact "C:\meintest\meineapp.exe"

Aber es funktionierte nicht. Die Konsole meldete zurück:

Code:

1603048 :   1603048 = 1,0 zu 1   meineapp.exe

Von 1 Dateien in 1 Verzeichnissen sind
0 komprimiert und 1 nicht komprimiert.
1.603.048 Datenbytes insgesamt werden in 1.603.048 Bytes gespeichert.
Das Komprimierungsverhältnis ist 1,0 zu 1.

Was könnte die Ursache dafür sein? Wie kann man die NTFS-Komprimierung dieser Datei mit Delphi bzw. programmatisch durchführen?

[PeterPanino]

Aha. Ich habe den

Code:

/c

switch vergessen. Damit funktioniert es.

[PeterPanino]

Wenn man den compact-Befehl für eine Datei ausführt, die bereits NTFS-komprimiert ist, so scheint nichts zu passieren.

Man braucht also offensichtlich nicht vorher zu prüfen, ob die Datei nicht NTFS-komprimiert ist?

[himitsu]

Zitat von PeterPanino:

Ich wollte mit TFile.SetAttributes das Dateiattribut faCompressed einer einzelnen Datei setzen, aber es funktionierte nicht.

Ich würde empfehlen die Dokumentaion zu lesen, denn da steht was zu machen ist.
SetFileAttributes

Verschlüsselung, Kompression und andere "Attribute" sind da nur als Information (ReadOnly) enthalten.

Genauso das FILE_ATTRIBUTE_NORMAL, welches nur dafür da ist, um "kein Atribut gesetzt" von "Fehler" unterscheiden zu können, da sonst beides 0 wäre.

[PeterPanino]

Zitat von himitsu:

Verschlüsselung, Kompression und andere "Attribute" sind da nur als Information (ReadOnly) enthalten.

Habe ich ja sinngemäß geschrieben, dass ich deswegen compact verwende.

[himitsu]

Was Compact intern macht, bzw. was man selber ausführen kann, wird dort auch genannt.