可能有必要先测一下注册表的这一项是否存在

if RegValueExists(HKLM, 'SOFTWARE\WOW6432Node\Microsoft\VisualStudio\14.0\VC\Runtimes\x64', 'Version')

 

这些代码都放在下面这个函数里:

function InitializeSetup(): boolean;

 

查看注册表的一项,看版本号是否以14开头。因为14.0对应2015.

rtn := RegQueryStringValue(HKLM, 'SOFTWARE\WOW6432Node\Microsoft\VisualStudio\14.0\VC\Runtimes\x64', 'Version', CurVer);
str := Copy(CurVer,2,2);

if str = '14' then
begin
    Result := true;
end 
else begin
    Result := false;
end;

相关文章:

  • 2022-01-23
  • 2021-07-14
  • 2022-12-23
  • 2022-12-23
  • 2021-08-15
  • 2022-01-19
  • 2021-11-19
猜你喜欢
  • 2022-02-26
  • 2022-01-01
  • 2021-11-23
  • 2021-09-08
  • 2022-12-23
  • 2022-01-02
相关资源
相似解决方案