用Delphi怎么实现注册表路径检查

一个Edit 一个Button。在Edit中输入完整的注册表路径单击button后找到的话出现“路径有效”没找到则弹出"路径无效"。要用Delphi写。哪位大侠帮帮忙咯。谢谢了,我这没分了。全部拿出来了。

假设输入完整注册表路径为 HKEY_LOCAL_MACHINE\SOFTWARE\Adobe\Acrobat Reader\9.0\InstallPath

则下图中PRootKey变量值为 HKEY_LOCAL_MACHINE
PKey变量值为 SOFTWARE\Adobe\Acrobat Reader\9.0\InstallPath
具体怎么截取你自己写
下面供参考

var
Reg: TRegistry;
begin
Reg := TRegistry.Create ;
Reg.RootKey := PRootKey;
try
if Reg.OpenKeyReadOnly(PKey) then
ShowMessage('路径有效')
else
ShowMessage('路径无效')
finally
Reg.CloseKey;
Reg.Free ;
end;
end;
温馨提示:内容为网友见解,仅供参考
无其他回答
相似回答