编译为什么出错了?(注册表问题) (25分)

  • 主题发起人 bluehouse
  • 开始时间
B

bluehouse

Unregistered / Unconfirmed
GUEST, unregistred user!
begin
Reg:=TRegistry.Create;
Reg.RootKey:=HKEY_LOCAL_MACHINE ;
if reg.openkey('software/microsoft/windows/currentversion/explorer/mycomputer/NameSpace/delegatefolders/{59031a47-3f72-44a7-89c5-5595fe6b30ee}',true)then
if checkbox1:=true then
begin
reg.WriteString('','');
end
else
reg.deletekey('{59031a47-3f72-44a7-89c5-5595fe6b30ee}');
end;
为什么错了?
 
if checkbox1.Checked=true then
 
uses Registry;

最后老大别忘了 reg.free;
 
不对,我己经解决了,谢谢各位!
 
QuickSilver 是对的
 
虽然我自己解决了,还是给分!多谢各位!
 
多人接受答案了。
 
顶部