delphi2007无法使用以下代码？

use Registry ;

function GetRegistryValue(KeyName: string): string;
var
Reg: TRegistry;
begin
Reg := TRegistry.Create();
try
Reg.RootKey := HKEY_LOCAL_MACHINE; //就这行报错
Reg.OpenKey(KeyName, False);
Result := Reg.ReadString('VALUE1');
finally
Reg.Free;
end;
end;


[解决办法]
最好写出来报的什么错误信息，另外第一行use Registry;错了，应该是uses Registry;
[解决办法]
uses Registry;

代码完全没问题
[解决办法]
use Registry ;搞错了，
应该为：uses Registry;