installshield 判断操作系统安装

最新推荐文章于 2015-11-09 11:10:00 发布

转载最新推荐文章于 2015-11-09 11:10:00 发布 · 206 阅读

文章标签：

#操作系统

本文介绍了如何使用注册表操作来实现CapsHook应用程序的安装与卸载过程。具体包括设置注册表路径、创建运行项、启动应用程序及卸载时删除对应的注册表项等步骤。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

export prototype DefaultFeature_Installed();
function DefaultFeature_Installed()
string szInfPath,szApp,szCmd,szKey,szKeyValue;
begin

// TARGETDIR = "<PROGRAMFILES>\EeePC\" in this project

if (CMDLINE == "/NotLaunchApp") then
  //do nothing
else
  //Launch app
  szApp = TARGETDIR + "CapsHook\\CapsHook.exe";
  LaunchApp(szApp,"");
    endif;

    if(SYSINFO.nISOSL == ISOSL_WINXP) then
  szKey = "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Run\\";
  szKeyValue = TARGETDIR + "CapsHook\\CapsHook.exe";

  RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);
  RegDBCreateKeyEx(szKey, "");
  RegDBSetKeyValueEx(szKey,"CapsHook",REGDB_STRING,szKeyValue,-1);
else
  szKey = "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Run\\";
  szKeyValue = "AsusSender.exe " + TARGETDIR + "CapsHook\\CapsHook.exe";

  RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);
  RegDBCreateKeyEx(szKey, "");
  RegDBSetKeyValueEx(szKey,"CapsHook",REGDB_STRING,szKeyValue,-1);
endif;
end;

// -------------------------------------------------------------------------

export prototype DefaultFeature_UnInstalled();
function DefaultFeature_UnInstalled()
string szApp, szKey, szKeyValue;
begin

//Delete Registry key
szKey = "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Run\\CapsHook";
RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);
RegDBDeleteKey(szKey);
end;