Скрипты Inno Setup. Помощь и советы [часть 8]

AlexanderSergeev · Отправлено: **13:26, 05-04-2016** | #**1481**

ZVSRus, посмотрел ваш сегодняшний скрипт и не понял, что за hex описание в секции для [ISFormDesigner]

З.Ы. Ребята извините за нубство, может знаете, как реализовать такой финт в инно?

ZVSRus · Конфигурация компьютера

Цитата AlexanderSergeev:

что за hex описание в секции для [ISFormDesigner]

У Вас какая версия Inno Setup

Цитата Dodakaedr:

Вот так

Экспериментировал пол дня, всего одно слово нужно было переименовать. Хотя PinIconCheck'ом переименовывал разное, но переименовать IsTaskSelected('Pin')
не допер. Моя не внимательность меня достала. Гляжу в книгу вижу фигу.

AlexanderSergeev · Отправлено: **15:29, 05-04-2016** | #**1483**

ZVSRus, расширенный юникод компилятор 5.5.1 от китайских собратьев

ZVSRus · Конфигурация компьютера

Цитата AlexanderSergeev:

расширенный юникод компилятор 5.5.1 от китайских собратьев

Зайди в Редактор Форм, создай новую страницу (например следом за WelcomePage). создай на ней компоненты (разные).
Автоматически создастся (не знаю как правильно называется) идентификатор страницы и компонентов [ISFormDesigner].

AlexanderSergeev · Отправлено: **16:21, 05-04-2016** | #**1485**

ZVSRus, теперь понял спасибо

ZVSRus · Конфигурация компьютера

Вопрос к Dodakaedr,у. Что нужно изменить в данной процедуре если финишная страница отключена.

Цитата:

procedure CurPageChanged(CurPageID: integer);
begin
case CurPageID of
wpFinished: begin
if PanelZadachCheck then PinToTaskbar(ExpandConstant('{app}\MyProg.exe'), True);
end;
end;
end;

А используется FinishedForm

Цитата:

function ShowFinishedForm(): Boolean;
var
FinishedForm: TSetupForm;
begin
FinishedForm := CreateCustomForm;
FinishedForm.Position:=poScreenCenter;
try
FinishedForm.ClientWidth := ScaleX(310);
FinishedForm.ClientHeight := ScaleY(133);
FinishedForm.BorderStyle := bsSingle;
FinishedForm.BorderIcons := [biSystemMenu];

Dodakaedr · Конфигурация компьютера

Цитата ZVSRus:

Что нужно изменить в данной процедуре если финишная страница отключена. »

Используйте не постраничный этап, а этапы установки, то есть:

Код:

procedure CurStepChanged(CurStep: TSetupStep);
begin
  case CurStep of
    ssPostInstall:
      begin
        if PanelZadachCheck then PinToTaskbar(ExpandConstant('{app}\MyProg.exe'), True);
      end;
  end;
end;

Batistas · Отправлено: **03:37, 06-04-2016** | #**1488**

Всем привет! Решил организовать сжатие сборки CS:S через связку Precomp + Srep + Arc.

Батник автоматизации

arc a -ep1 -ed -r -w.\ Setup.bin -mprecomp:t-
nfj:zl11,18,34,39,44,55,68,75,82,83,84,85,97,98:d10+srep+exe+delta+lzma:a1:mfbt4:d256m:fb128:mc1000: lc8 "D:\test1\Modules\*"

Но во время установки происходит следующее:

Версия ISDone 0.6 final.

Подскажет кто-нибудь решение проблемы?

AlexanderSergeev · Отправлено: **08:22, 06-04-2016** | #**1489**

Цитата Batistas:

Подскажет кто-нибудь решение проблемы? »

Как вариант, проверьте в скрипте раскомментированы ли секции #define PrecompInside (0.38-0.42 зависит от версии) и #define SrepInside
В темпе обязательно должны находиться: последний ISDone.dll, unarc.dll, соответствующие CLS фильтры, модифицированный precomp.exe, подменная packjpg_dll.dll и zlib1.dll
Да, еще такой момент, если пакуете данные Arc.exe/FreeArc, которые подписаны FA_protect, то и распаковывать нужно патченным экземпляром unarc.dll

ispolin · Отправлено: **10:00, 08-04-2016** | #**1490**

Помогите. Видимо куда то ткнул и получил

было

стало

версия Inno 5.5.8
версия ISTools 5.3.0.1

как исправить?