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

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

Ветеран


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

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


Цитата R.i.m.s.k.y.:
Вот такой инно-код для тихой установки без вопросов »
зачем для каждой страницы писать одно и то же, нужно просто было задать для всех страниц это действие...
Цитата R.i.m.s.k.y.:
Как его убрать, как сделать так бы при запуске экзешника все ставилось без нажатий далее/установить? »
допустим так:
читать дальше »
Код: Выделить весь код
[Setup]
AppName=My Program
AppVerName=My Program v 1.5
DefaultDirName={pf}\My Program
OutputDir=.
Compression=lzma/ultra64
InternalCompressLevel=ultra64
SolidCompression=yes

[Languages]
Name: russian; MessagesFile: compiler:Languages\Russian.isl

[Code]
{ отобpажает или пpячет окно обpазом, указанным паpаметpом в nCmdShow }
function ShowWindow(hWnd: HWND; nCmdShow: Integer): BOOL; external 'ShowWindow@user32.dll stdcall';

const
  { обычный клик }
  BM_CLICK = $00F5;

procedure CurPageChanged(CurPageID: Integer);
{ на старых версиях IS достаточно было указать
  WizardForm.NextButton.OnClick(WizardForm.NextButton);
  сейчас же стопориться на странице wpReady, обходится это таким образом }
begin
  { использую для скрытия окна мастера, в противном случае видно страницу wpInstalling }
  ShowWindow(StrToInt(ExpandConstant('{wizardhwnd}')), SW_HIDE);
  { здесь нажимаем кнопку... }
  PostMessage(WizardForm.NextButton.Handle, BM_CLICK, 0, 0);
end;

-------
Книги нужны, чтобы напоминать человеку, что его оригинальные мысли не так уж новы... Авраам Линкольн.

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

Отправлено: 17:08, 17-08-2010 | #2201