» Inno Setup (создание инсталяционных пакетов)

VASYAKRN это скрипт Shepard'a. Если что то вот

У кого есть скрипт для такого инсталлятора ?

Y4enik32
очевидно же, у автора репака.

Появился вопрос: если я использую архивы FreeArc в инсталляторе, то как можно реализовать запрос следующего диска? К примеру: файлы setup.exe, setup-1.arc, setup-2.arc записать на первый диск, а setup-3.arc и setup-4.arc на запрашиваемый второй. Теперь нужно использовать скрипт ISFreeArcExtract v.4.0? Или есть другой способ?

Percey123 http://rghost.ru/5036117 попробуй это

Цитата:

Или есть другой способ?

IsDone

Вот когда каждый раз делаю что-то хорошое, у меня настроенеие так поднимается! Сегодня я перевёл инструкцию по добавлению нужных кусков кода ISSkin в скрипт. Стиль страницы ничем ни отличается от оригинальной, кроме языка - он теперь русский. Вот ссылка. Надеюсь будет полезно, хотя бы для новичков, которым лень читать английский. Даже можно добавить в шапку, если никто не против.

привет всем! подскажите как сделать прогресс бар для распаковки arc архива, а то у меня пока архив полностью не распакуется, прогресс бар не сдвинется.

bugron

Цитата:

Вот когда каждый раз делаю что-то хорошое, у меня настроенеие так поднимается!

Молодец! Хорошее дело делаешь

Цитата:

Даже можно добавить в шапку, если никто не против.

Добавил этот перевод, а также перевод справки

Добавлено:
alex0413
Телепаты как всегда в отпуске...

Пожалста подскажите как сделать чтоб вокруг readymemo и componentlist не била рамочки
Gnom3
как ти сделал в скрипте insertmag с помошчу одного изображения текстурирувал все кнопки и чекбокси.
Пожалста помогитеag с помошчу одного изображения текстурирувал все кнопки и чекбокси.
Пожалста помогите

Как на последней странице повесить на свою кнопку Завершить свое действие?
procedure CloseBtnClick(h:HWND);
Var
ErrorCode: integer;
begin
Exec(ExpandConstant('{app}') + 'MyApp.exe',' ', ExpandConstant('{app}'), SW_HIDE, ewNoWait, ErrorCode);
WizardForm.Close;
end

Так не работает

Всем привет! Как сделать, чтобы инстал не показывал какой файл сейчас распаковывается, а просто писал "распаковка файлов"??? Спасибо!

Sergey_Demchuk

Код: function NextButtonClick(CurPageID: Integer): Boolean;
Var
ErrorCode: integer;
begin
Result:=True;
If CurPageID=wpFinished then
Exec(ExpandConstant('{app}') + 'MyApp.exe',' ', ExpandConstant('{app}'), SW_HIDE, ewNoWait, ErrorCode);
end;

Цитата:

привет всем! подскажите как сделать прогресс
бар для распаковки arc архива, а то у меня
пока архив полностью не распакуется,
прогресс бар не сдвинется.

Как узнать сколько всего архив весит, и сколько уже распаковано, и по мере этого двигать прогресс бар. Это все что мне нужно.

Добавлено:
если если без скрипта непонятно, могу выложить

Gnom3
Как это событие вызвать для ботвы?
if hBtnSt=0 then hBtnSt:=BtnCreate(WizardForm.FinishedPage.Handle,Left-8,Top-8,Width+16,Height+16,ExpandConstant('{tmp}\button.png'),18,False);
BtnSetEvent(hBtnSt,BtnClickEventID,WrapBtnCallback(@WizardFormBtnClick,1));
BtnSetText(hBtnSt,'Start ArchiCAD');
BtnSetFont(hBtnSt,Font.Handle);
BtnSetFontColor(hBtnSt,$DAE369,$DAE369,$DAE369,$B6B6B6);
end;

Sergey_Demchuk
точно так-же, тобиш, именно так. как у меня в примере. При текстурировании кнопок с помощью ботвы, кнопка все равно выполняет нажатие на родную кнопку инсталлятора.

Цитата:

Цитата: to all
Подробнее...
задача: надо сделать вторую кнопку рабочей, чтобы можно было выбирать папку и чтобы определенные компоненты туда ставились
буду рад любой помощи

+


Цитата:

Вот так вторая кнопка работает, но как присвоить NewEdit1.Text равной значению пути, не знаю, нужна помощь спецов.

Оказалось , что для таких целей можно использовать специальную страницу TInputDirWizardPage. Теперь после старнцы выбор пути установки появится эта новая страница. Скрипт
Правда с картинками была проблема, поэтому я их убрал.

Цитата:

Как узнать сколько всего архив весит, и сколько уже распаковано, и по мере этого двигать прогресс бар. Это все что мне нужно.

Отображение всей этой инфы уже предусмотрено в скрипте распаковки архивов. И если у тебя она не отображается, значит ты криво добавил скрипт распаковки к своему скрипту...

Gnom3
Я просто не знаю как его вызвать
BtnSetEvent(hBtnSt,BtnClickEventID,WrapBtnCallback(@NextButtonClick,1));
Не проходит так, параметр задан неверно
BtnSetEvent(hBtnSt,BtnClickEventID,WrapBtnCallback(@NextButtonClick(CurPageID),1));
тоже вызывает ошибку

YURSHAT
Я используя isexec v0.7, и там меня все устраивает, кроме прогресс бара, и я решил прикрутить туда движение во время распаковки со скрипта shegoratа, но я в том скрипте запутался

Sergey_Demchuk
Я-же говорю, оставляй как есть. Текстурированная кнопка в любом случае выполняет нажатие на стандартную кнопку, а стандартная кнопка при каждом нажатии всегда вуполняется function NextButtonClick(CurPageID: Integer): Boolean;, и соответственно, содержимое этой функции.
Поэтому и нужно условие - If CurPageID=wpFinished then, чтоб код выполнился только при нажатии на кнопку на финишной странице. В общем, ве, что нужно было - это добавить в свой скрипт тот код, который я дал.

Добавлено:
alex0413
Зачем прикручивать движение(в реальности чего я сомневаюсь) если можно просто использовать модуль распаковки Шегората? Хотя, некоторые (и я в том числе) любят сложные пути.

Кто знает, как решить эту проблему? http://s59.radikal.ru/i165/1108/2e/39968fd46895.png

Gnom3, помогите пожалуйста!

Gnom3
Ну я щитаю что в том модуле очень много лишнего и ненужного, в вырезать и переделывать это будет сложнее чем склеить из нескольких скриптов чтото стоящее и то что будет вполне устраивать.

tema001
У тебя просто ошибка в другом месте. внимательно посмотри то место, где ты распаковываеш слайды, и где добавляеш их в пик-лист.

Добавлено:
Magellan777

Код: WizardForm.FilenameLabel.Hide;
WizardForm.StatusLabel.Caption:='твой текст'

Gnom3
Точно, не сообразил, работает теперь. Спасибо.
Может еще поскажешь, есть ли примерчик где с кнопкой-хрестик и кнопкой минимизации вверху справа. Стандартные убрал, ибо границы хотелось у окна убрать, а новые кнопочки пририсовать надо самому....

Sergey_Demchuk
Так, както.
[more=код][Setup]
AppName=MyApp
AppVername=MyApp
DefaultDirname={pf}\MyApp

[code]
var
xBtn, Minbtn: TButton;

procedure CloseBtnClick(Sender: TObject);
begin
WizardForm.Close;
end;

procedure MinBtnClick(Sender: TObject);
begin
SendMessage(WizardForm.Handle,$112,61472,0);
end;

Procedure initializeWizard();
begin
WizardForm.OuterNotebook.Hide;

xBtn:= TButton.Create(WizardForm);
xBtn.SetBounds(460, 10, 18, 18);
xBtn.OnClick:= @CloseBtnClick;
xBtn.Caption:='X';
xBtn.Parent:= WizardForm;

minBtn:= TButton.Create(WizardForm);
MinBtn.SetBounds(440, 10, 18, 18);
MinBtn.OnClick:= @MinBtnClick;
MinBtn.Caption:='_';
MinBtn.Parent:= WizardForm;
end;[/more]

Спасибо! Если Я файлы игры упаковал в архив, а затем создал инстал и в секции [Files] добавил его, то в результате уже готовий инстал занимает так же (если не более чем) сам архив. Почему инно не запаковывает архивы еще сильнее?

И как пользоваться precom?

insombia
Edison007007
Спасибо.

Добавлено:
Magellan777
А вы пробовали архивировать архивы? Вот здесь тот же случай. Размер будет такой же, а то и в основном больше. Лучше не маяться дурью, а добавить в свой скрипт распаковку архивов. Будет намного лучше и удобнее.

скрипт http://rghost.ru/18869651
Всем привет) Пожалуйста помогите) добавьте в мой скрипт проверку сист.требований,далее, сделайте так, чтобы слова(вас приветствует мастер установки и так далее) были прозрачными(слова Завершение мастера установки...) также.
Далее сделайте так, чтобы кнопки(далее, отмена, назад, обзор)были черного цвета.
Далее сделайте так, чтобы при установки было написано что распаковывается, сколько времени прошло и осталось.
И последнее, вот скриншот http://s54.radikal.ru/i145/1108/79/9b6beb092813.jpg сделайте пожалуйста ее тоже черного цвета(слова соответственно белого)
Спасибо за внимание, Зарание спасибо)
Помогите пожалуйста, очень долго парился с этим, никак не могу сделать)

Magellan777
тебе сюда с прекомпом