From b552e6914edb61b19f42123071659f9cb3b26cf8 Mon Sep 17 00:00:00 2001 From: RKrom Date: Thu, 17 May 2012 19:55:21 +0000 Subject: [PATCH] Fixed check problems when installing Greenshot on 32 bit windows git-svn-id: http://svn.code.sf.net/p/greenshot/code/trunk@1871 7dccd23d-a4a3-4e1f-8c07-b4c1b4018ab4 --- Greenshot/releases/innosetup/setup.iss | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/Greenshot/releases/innosetup/setup.iss b/Greenshot/releases/innosetup/setup.iss index 4354fa03d..30cfc512a 100644 --- a/Greenshot/releases/innosetup/setup.iss +++ b/Greenshot/releases/innosetup/setup.iss @@ -227,10 +227,11 @@ begin sUnInstPath := ExpandConstant('Software\Microsoft\Windows\CurrentVersion\Uninstall\{#emit SetupSetting("AppId")}_is1'); sUnInstallString := ''; // Retrieve uninstall string from HKLM(32/64) or HKCU(32/64) - if not RegQueryStringValue(HKLM64, sUnInstPath, 'UninstallString', sUnInstallString) then - if not RegQueryStringValue(HKCU64, sUnInstPath, 'UninstallString', sUnInstallString) then - if not RegQueryStringValue(HKLM32, sUnInstPath, 'UninstallString', sUnInstallString) then - RegQueryStringValue(HKCU32, sUnInstPath, 'UninstallString', sUnInstallString); + if not RegQueryStringValue(HKLM32, sUnInstPath, 'UninstallString', sUnInstallString) then + if not RegQueryStringValue(HKCU32, sUnInstPath, 'UninstallString', sUnInstallString) then + if IsWin64 then + if not RegQueryStringValue(HKLM64, sUnInstPath, 'UninstallString', sUnInstallString) then + RegQueryStringValue(HKCU64, sUnInstPath, 'UninstallString', sUnInstallString); Result := sUnInstallString; end;