service - innosetup，卸载共享服务

Question

我正在通过 InnoSetup 的代码部分安装和卸载一些服务应用程序，如下所示。

ShellExec('', ExpandConstant('{app}\') + dExeName, '/install /silent', '', SW_HIDE, ewWaitUntilTerminated, ErrorCode);
    ....
ShellExec('', ExpandConstant('{app}\') + dExeName, '/uninstall /silent', '', SW_HIDE, ewWaitUntilTerminated, ErrorCode);

现在我有一个单独的应用程序，它使用相同的服务。两个应用程序的安装程序都会安装和卸载这些服务。

我需要一个解决方案，如果计算机上仍然存在其他应用程序，卸载程序不应卸载。

法鲁克。最好的问候。

Answer 1

两个安装程序都应使用 [Registry] 部分 ( http://www.jrsoftware.org/ishelp/index.php?topic=registrysection ) 在注册表中设置一个条目，设置标志 uninsdeletekey。

在这两个卸载程序中，您可以通过执行以下操作检查其他应用程序是否仍在安装

 if not RegKeyExists(HKEY_LOCAL_MACHINE, 'Software\Faruk\OtherSoftwareName') then
 begin
    // The key exists
    ShellExec('', ExpandConstant('{app}\') + dExeName, '/uninstall /silent', '', SW_HIDE, ewWaitUntilTerminated, ErrorCode); 
 end;