Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Аватара для R.i.m.s.k.y.

Ветеран


Сообщения: 1640
Благодарности: 536

Профиль | Отправить PM | Цитировать


al70, использовать CurStep = ssPostInstall или CurStep = ssDone
Код: Выделить весь код
procedure CurStepChanged(CurStep: TSetupStep);
begin
    if CurStep = ssPostInstall then
    begin
      MsgBox('это шаг ssPostInstall', mbInformation, MB_OK);
      твоя_функция;
    end;
    if CurStep = ssDone then
    begin
      MsgBox('это шаг ssDone', mbInformation, MB_OK);
      твоя_функция;
    end;
end;

-------
Хороший установщик тот, которого не замечаешь
Оформление в инно пустая трата времени: толку мало, головняка много, а ошибок истчо больше!

Это сообщение посчитали полезным следующие участники:

Отправлено: 08:06, 29-03-2012 | #1336