delphi2007无法使用以下代码？解决思路

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;