Код:
function StrCmpLogicalW(psz1, psz2: string): Integer; external 'StrCmpLogicalW@shlwapi.dll stdcall';
procedure InitializeWizard;
var
PSVersion: string;
begin
if not RegQueryStringValue(HKLM, 'SOFTWARE\Microsoft\PowerShell\3\PowerShellEngine', 'PowerShellVersion', PSVersion) or
(StrCmpLogicalW(PSVersion, '5.2') < 0) then
begin
{ ... }
{ IDPForm.Page is create inside idpDownloadAfter. }
idpDownloadAfter(wpReady);
end;
end;
procedure CurPageChanged(CurPageID: Integer);
begin
if not IsWindows10OrNewer and
Assigned(IDPForm.Page) then
begin
if CurPageID = IDPForm.Page.ID then
begin
{ ... }
end;
end;
end;