Nachtrag von himitsu:
jetzt dokumentiert
SfcGetNextProtectedFile > geschützte Dateien auflisten
SfcIsFileProtected > prüfen ob eine Datei geschützt ist
Diese Funktionen sind mir zufällig über'n Weg gelaufen und vorm Posten hab'sch dann noch den Thread eines altbekannten
DP-Users entdeckt.
hier mal die wichtigsten Funktionen aus der Sfc.dll.
Delphi-Quellcode:
Type PROTECTED_FILE_DATA = packed Record
FileName: packed Array[0..MAX_PATH-1] of WideChar;
FileNumber: LongWord;
End;
Function SfcGetNextProtectedFile(RpcHandle: THandle; Var ProtFileData: PROTECTED_FILE_DATA): LongBool; StdCall;
External 'Sfc.dll' name 'SfcGetNextProtectedFile';
Function SfcIsFileProtected(RpcHandle: THandle; ProtFileName: PWideChar): LongBool; StdCall;
External 'Sfc.dll' name 'SfcIsFileProtected';
Var ProtFileData: PROTECTED_FILE_DATA;
Begin
ProtFileData.FileNumber := 0;
While SfcGetNextProtectedFile(0, ProtFileData) do
Memo1.Lines.Add(IntToStr(ProtFileData.FileNumber) + ': ' + ProtFileData.FileName);
End;
Wer selber Dateien schützen, oder daran was ändern will, der kann sich ja in den unter
SfcGetNextProtectedFile weiterverlinkten Seiten zum Thema Installer umsehen...