Вопрос How to add a message box at the end of the setup?

nizcoz

Участник
Hi! Thanks for answer. I want replace the finishedpage by a message box, after installation. It is possible?
 
Последнее редактирование:

nizcoz

Участник
The problem is NOT SOLVED!

I use:

[CustomMessages]

english.Finished=The installation is completed.

spanish.Finished=La instalación se ha completado.

and....

procedure DeinitializeSetup();
begin
MsgBox(CustomMessage('Finished'), mbInformation, MB_OK);
UnLoadVCLStyles;
end;

But the message appears too when i press cancel button at start the setup. Any solution?
 
Последнее редактирование:

SBalykov

Старожил
I want replace the finishedpage by a message box, after installation. It is possible?
Код:
procedure CurStepChanged(CurStep: TSetupStep);
begin
  case CurStep of
  ssDone : MsgBox(CustomMessage('Finished'), mbInformation, MB_OK);
// If DisableFinishedPage=yes in [Setup] section you can replace ssDone to ssPostInstall
  end;
end;
 
Последнее редактирование:

nizcoz

Участник
^Thanks!!! The problem is solved!!!!
 
Последнее редактирование:
Сверху