mirror of
https://github.com/pgadmin-org/pgadmin4.git
synced 2025-02-03 04:00:55 -06:00
Fixed an issue where installation of pgadmin4 not working on 32-bit Windows. Fixes #5630
This commit is contained in:
parent
b91f6f0f5c
commit
2db518c9c6
@ -13,7 +13,8 @@ New features
|
|||||||
Housekeeping
|
Housekeeping
|
||||||
************
|
************
|
||||||
|
|
||||||
| `Issue #5326 <https://redmine.postgresql.org/issues/5326>`_ - Improve code coverage and API test cases for Domain and Domain Constraints
|
| `Issue #5326 <https://redmine.postgresql.org/issues/5326>`_ - Improve code coverage and API test cases for Domain and Domain Constraints.
|
||||||
|
| `Issue #5630 <https://redmine.postgresql.org/issues/5630>`_ - Fixed an issue where installation of pgadmin4 not working on 32-bit Windows.
|
||||||
|
|
||||||
Bug fixes
|
Bug fixes
|
||||||
*********
|
*********
|
||||||
|
@ -195,15 +195,20 @@ begin
|
|||||||
end
|
end
|
||||||
else
|
else
|
||||||
begin
|
begin
|
||||||
// Check if pgAdmin 64 bit is already installed
|
// Suppose system is running a 32-bit version of Windows then no need to check HKLM64 in RegQueryStringValue
|
||||||
RegQueryStringValue(HKLM64,'Software\{#MyAppName}\{#MyAppVersion}', 'Version', Version);
|
// So IsWin64 - will make sure its should only execute on 64-bit veersion of windows.
|
||||||
|
if IsWin64 then
|
||||||
|
begin
|
||||||
|
// Check if pgAdmin 64 bit is already installed
|
||||||
|
RegQueryStringValue(HKLM64,'Software\{#MyAppName}\{#MyAppVersion}', 'Version', Version);
|
||||||
|
|
||||||
// If version is found the shouldn't install 32bit - abort
|
// If version is found the shouldn't install 32bit - abort
|
||||||
if Length(Version) > 0 then
|
if Length(Version) > 0 then
|
||||||
begin
|
begin
|
||||||
MsgBox(ExpandConstant('{#MyAppErrorMsgIsWin64}'), mbCriticalError, MB_OK);
|
MsgBox(ExpandConstant('{#MyAppErrorMsgIsWin64}'), mbCriticalError, MB_OK);
|
||||||
Result := False;
|
Result := False;
|
||||||
InstallationFound := True;
|
InstallationFound := True;
|
||||||
|
end;
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user