RegOpenKeyEx返回5,在线急等解决办法

RegOpenKeyEx返回5,在线急等代码如下,返回值是5,请各位大虾分析下是什么原因function TExcelCtr.isSetUpEx

RegOpenKeyEx返回5,在线急等
代码如下,返回值是5,请各位大虾分析下是什么原因
function TExcelCtr.isSetUpExel: Boolean;
var
  TmepKEY : hKey;
  Ret : Double;
begin
  Result := False;
  Ret :=RegOpenKeyEx(HKEY_CLASSES_ROOT,'Excel.Application',0,KEY_ALL_ACCESS,TmepKEY);
  Try
  if ret =ERROR_SUCCESS then Result := True;
  Finally
  RegCloseKey(TmepKEY);
  end;
end;

操作系统 windows 2000 ,office 2003
肯定是有安装excel的

[解决办法]
还是检查一下是否有Excel.Application分支,我试过了,在我机器上返回0
[解决办法]
返回值是5是什么意思?

函数的返回值是boolean,不外乎true(非0值)和false(0值)两种情况
只要返回值非0,那就是true,意思是成功