Inno Setup的：根据产品代码

Question

我要实现类似Inno setup - skip installation if other program is not installed

的东西，但是我确实有MSIEXEC产品代码（如D3AA40C4-9BFB-4640-88CE-EDC93A3703CC）检测安装。那么如何根据这个产品代码来检测是否安装了另一个程序？

Answer 1

这里有MsiQueryProductState函数。下面是它的进口与您的任务助手功能：

[Code] 
#IFDEF UNICODE 
    #DEFINE AW "W" 
#ELSE 
    #DEFINE AW "A" 
#ENDIF 
type 
    INSTALLSTATE = Longint; 
const 
    INSTALLSTATE_DEFAULT = 5; 

function MsiQueryProductState(szProduct: string): INSTALLSTATE; 
    external 'MsiQueryProductState{#AW}@msi.dll stdcall'; 

function IsProductInstalled(const ProductID: string): Boolean; 
begin 
    Result := MsiQueryProductState(ProductID) = INSTALLSTATE_DEFAULT; 
end; 

及其可能的用途：

if IsProductInstalled('{D3AA40C4-9BFB-4640-88CE-EDC93A3703CC}') then 
    MsgBox('The product is installed.', mbInformation, MB_OK);