غيرفعال نمودن Wfp

[NoneForce]

سلام
با استفاده از تابع زير مي توانيد Windows File Protection را فعال يا غير فعال نماييد.
پس از غيرفعال نمودن مي توانيد فايلهاي سيستمي را تغيير دهيد. در صورت فعال بودن پس از تغيير اينگونه فايلها ويندوز نسخه دستكاري شده را با نسخه اصلي جايگزين مي نمايد!

procedure SetSFC(Disable : boolean);
var
Reg: TRegistry;
begin
Reg := TRegistry.Create;
Reg.RootKey := HKEY_LOCAL_MACHINE;
Reg.OpenKey('SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon', False);
if Disable then
Reg.WriteInteger('SFCDisable',4294967197)
else
Reg.WriteInteger('SFCDisable',0);
Reg.CloseKey;
Reg.Free;
end;