@@ -15,7 +15,7 @@ AppPublisherURL={#appURL}
1515AppSupportURL = {#appURL}
1616AppUpdatesURL = {#appURL}
1717
18- WizardImageFile = prerequisites.png
18+ WizardImageFile = prerequisites.bmp
1919WizardSmallImageFile = bearsampp.bmp
2020DisableWelcomePage = no
2121ShowLanguageDialog = yes
@@ -49,30 +49,9 @@ Filename: "{tmp}\{#appId}\vcredist_2013\vcredist_x64.exe"; Parameters: "/quiet /
4949Filename : " {tmp} \{#appId}\vcredist_2015_2019\vc_redist.x86.exe" ; Parameters : " /quiet /norestart" ; StatusMsg : Installing Visual C++ 2015 -2019 Runtimes x86 (VC14 VC15 VC16)...; Flags : runhidden waituntilterminated
5050Filename : " {tmp} \{#appId}\vcredist_2015_2019\vc_redist.x64.exe" ; Parameters : " /quiet /norestart" ; StatusMsg : Installing Visual C++ 2015 -2019 Runtimes x64 (VC14 VC15 VC16)...; Check : IsWin64; Flags : runhidden waituntilterminated
5151Filename : " {tmp} \{#appId}\vcredist_2015_2022\vc_redist.x64.exe" ; Parameters : " /quiet /norestart" ; StatusMsg : Installing Visual C++ 2015 -2022 Runtimes x64 (VC14 VC15 VC16 VC17)...; Check : IsWin64; Flags : runhidden waituntilterminated
52- Filename : " wusa.exe" ; Parameters : " " " {tmp} \{#appId}\KB2731284\Windows6.1-KB2731284-v3-x86.msu" " /quiet /norestart" ; StatusMsg : Installing KB2731284 x86 ...; Check : InstallKB2731284x86; Flags : runhidden waituntilterminated
53- Filename : " wusa.exe" ; Parameters : " " " {tmp} \{#appId}\KB2731284\Windows6.1-KB2731284-v3-x86.msu" " /quiet /norestart" ; StatusMsg : Installing KB2731284 x64 ...; Check : InstallKB2731284x64; Flags : runhidden waituntilterminated
54- Filename : " {tmp} \{#appId}\KB838079\WindowsXP-KB838079-SupportTools-ENU.exe" ; Parameters : " /Q /C:" " msiexec.exe /qb /i suptools.msi REBOOT=ReallySuppress ADDLOCAL=ALL" " " ; StatusMsg : Installing KB838079...; Check : InstallKB838079; Flags : runhidden waituntilterminated
5552
5653[Code]
5754
58- function IsWinXP : boolean;
59- var
60- Version: TWindowsVersion;
61- begin
62- GetWindowsVersionEx(Version);
63- if (Version.Major = 5 ) and (Version.Minor = 1 ) then
64- result := true;
65- end ;
66-
67- function IsWin7 : boolean;
68- var
69- Version: TWindowsVersion;
70- begin
71- GetWindowsVersionEx(Version);
72- if (Version.Major = 6 ) and (Version.Minor = 1 ) then
73- result := true;
74- end ;
75-
7655function IsKBInstalled (KB: string): Boolean;
7756var
7857 WbemLocator: Variant;
8665 WbemObjectSet := WbemServices.ExecQuery(WQLQuery);
8766 Result := (not VarIsNull(WbemObjectSet)) and (WbemObjectSet.Count > 0 );
8867end ;
89-
90- function InstallKB2731284x86 : boolean;
91- begin
92- if IsWin7 and not IsKBInstalled(' KB2731284' ) then
93- result := true;
94- end ;
95-
96- function InstallKB2731284x64 : boolean;
97- begin
98- if IsWin7 and IsWin64 and not IsKBInstalled(' KB2731284' ) then
99- result := true;
100- end ;
101-
102- function InstallKB838079 : boolean;
103- begin
104- if IsWinXP and not IsKBInstalled(' KB838079' ) then
105- result := true;
106- end ;
0 commit comments