Сообщение после установки при наличии кастомного параметра запуска

[slamok88]

Использую параметры /VERYSILENT /SUPPRESSMSGBOXES для запуска установщика. Используется опция DisableFinishedPage=True.
Требуется при наличие кастомного параметра запуска (например /FM) в конце установки выводить окно с собственным текстом и кнопкой ОК, а также же этим же образом возможность включить опцию DisableFinishedPage=False.

 

[HandyMan]

procedure CurStepChanged(CurStep: TSetupStep);
var
  i: Integer;
begin
  if CurStep = ssDone then begin
    for i:=0 to ParamCount() do
    begin
      if ParamStr(i) = '/FM' then
        MsgBox('Hello.', mbInformation, MB_OK);
    end;
    
  end;
end;

 

[slamok88]

Работает, спасибо!