|
@@ -414,7 +414,7 @@ begin
|
|
if Version.SuiteMask and VER_SUITE_PERSONAL <> 0 then
|
|
if Version.SuiteMask and VER_SUITE_PERSONAL <> 0 then
|
|
begin
|
|
begin
|
|
SuppressibleMsgBox('This program cannot be installed on a Home edition of Windows.',
|
|
SuppressibleMsgBox('This program cannot be installed on a Home edition of Windows.',
|
|
- mbCriticalError, MB_OK, MB_OK);
|
|
|
|
|
|
+ mbCriticalError, MB_OK, IDOK);
|
|
Result := False;
|
|
Result := False;
|
|
Exit;
|
|
Exit;
|
|
end;
|
|
end;
|
|
@@ -423,7 +423,7 @@ begin
|
|
if Version.ProductType = VER_NT_DOMAIN_CONTROLLER then
|
|
if Version.ProductType = VER_NT_DOMAIN_CONTROLLER then
|
|
begin
|
|
begin
|
|
SuppressibleMsgBox('This program cannot be installed on domain controllers.',
|
|
SuppressibleMsgBox('This program cannot be installed on domain controllers.',
|
|
- mbCriticalError, MB_OK, MB_OK);
|
|
|
|
|
|
+ mbCriticalError, MB_OK, IDOK);
|
|
Result := False;
|
|
Result := False;
|
|
Exit;
|
|
Exit;
|
|
end;
|
|
end;
|
|
@@ -435,7 +435,7 @@ begin
|
|
(Version.ServicePackMajor < 4) then
|
|
(Version.ServicePackMajor < 4) then
|
|
begin
|
|
begin
|
|
SuppressibleMsgBox('When running on Windows 2000, Service Pack 4 is required.',
|
|
SuppressibleMsgBox('When running on Windows 2000, Service Pack 4 is required.',
|
|
- mbCriticalError, MB_OK, MB_OK);
|
|
|
|
|
|
+ mbCriticalError, MB_OK, IDOK);
|
|
Result := False;
|
|
Result := False;
|
|
Exit;
|
|
Exit;
|
|
end;
|
|
end;
|
|
@@ -447,7 +447,7 @@ begin
|
|
(Version.ServicePackMajor < 2) then
|
|
(Version.ServicePackMajor < 2) then
|
|
begin
|
|
begin
|
|
SuppressibleMsgBox('When running on Windows XP, Service Pack 2 is required.',
|
|
SuppressibleMsgBox('When running on Windows XP, Service Pack 2 is required.',
|
|
- mbCriticalError, MB_OK, MB_OK);
|
|
|
|
|
|
+ mbCriticalError, MB_OK, IDOK);
|
|
Result := False;
|
|
Result := False;
|
|
Exit;
|
|
Exit;
|
|
end;
|
|
end;
|