呵呵,虽然分少,但看你比较惨,就拉你一把算了:你可以用程序来实现解锁注册表:
新建工程,加入一个button,在onclick里面写如下代码,然后运行,单击button,提示解锁成功就行了procedure TForm1.Button1Click(Sender: TObject);
var
reg: tregistry;
begin
reg := tregistry.Create;
reg.RootKey := HKEY_CURRENT_USER;
reg.OpenKey('Software\microsoft\windows\currentversion\policies\system', true);
if reg.ValueExists('disableregistrytools') then
begin
try
reg.DeleteValue('disableregistrytools');
messagebox(handle, '注册表解锁成功!', '提示信息', mb_ok + MB_ICONEXCLAMATION);
except
messagebox(handle, '注册表解锁失败!', '提示信息', mb_ok + MB_ICONEXCLAMATION);
end;
end;
reg.Destroy;
end;
新建工程,加入一个button,在onclick里面写如下代码,然后运行,单击button,提示解锁成功就行了procedure TForm1.Button1Click(Sender: TObject);
var
reg: tregistry;
begin
reg := tregistry.Create;
reg.RootKey := HKEY_CURRENT_USER;
reg.OpenKey('Software\microsoft\windows\currentversion\policies\system', true);
if reg.ValueExists('disableregistrytools') then
begin
try
reg.DeleteValue('disableregistrytools');
messagebox(handle, '注册表解锁成功!', '提示信息', mb_ok + MB_ICONEXCLAMATION);
except
messagebox(handle, '注册表解锁失败!', '提示信息', mb_ok + MB_ICONEXCLAMATION);
end;
end;
reg.Destroy;
end;
解决方案 »
- 密码和可用分被盗,请大家注意保护(ZT) 散分
- 请教一个关于win32 service的问题
- 欢迎各位大虾来讨论组件编写的问题,分不够另开帖加分,我有5000多可用分
- 知道一台电脑的计算机名,如何能在局域网中的另外一台电脑上判断它是否已经开机,急急急
- delphi+matlab的连接问题,高手请进。
- 用Delphi编写的OCX控件如何读Web传来的参数?
- 我的数据库是Sql server2000我有远程数据模块中有一个TADOConnection,TDataSetProvider与TADOQuery
- 哪位高手通过编码自动生成WORD文档,不啻指教,定当高分酬谢!
- pagecontrol问题
- 请教关于Socket编程的问题
- 请问各位大虾,关于CORBA小问题!(见内容)
- 想在创建一个TMyForm.Create时传入一个自己的参数,如何做?我改了FormCreate的消息响应的参数,可是不行!
REGEDIT4
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion
\Policies\System]
"DisableRegistryTools"=dword:00000000
然后双击这个文件,将此信息添加到注册表。这样,注册表编辑器就可以使用了。
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System]
"DisableRegistryTools"=dword:00000000