[Johny777]

Raf-9600,
Item Enabled : = False
объект включен НЕТ, те заблокирован

у тебя все дочернин объекты относятся к двум переключателям (двум играм)
а дочерний объект переключателя не может быть заблокированнным
пример
в 1 игре один элемент (та же активация например) заблокирован
я переключаюсь на игру 2, но все дочернин элементы первой должны лишиться своих флажков, а с одним не получается. Он заблокирован.
попробуй так скомпилировать

читать дальше »

Код:

[Setup]
AppName=My Program
AppVerName=My Program 1.5
DefaultDirName={pf}\My Program
DefaultGroupName=My Program

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

Raf-9600, 

Name: "Diablo"; Description: Diablo; Flags: exclusive disablenouninstallwarning;
Name: "Diablo\Local"; Description: Локализация; Flags: exclusive disablenouninstallwarning
Name: "Diablo\Local\Russian"; Description: Русская; Flags: exclusive collapsed disablenouninstallwarning; ExtraDiskSpaceRequired: 518540567
Name: "Diablo\Local\Russian\Stream"; Description: Stream; Flags: exclusive disablenouninstallwarning; Types: full
Name: "Diablo\Local\Russian\Fargus"; Description: Фаргус; Flags: exclusive collapsed disablenouninstallwarning;
Name: "Diablo\Local\Englisch"; Description: Английская; Flags: exclusive collapsed disablenouninstallwarning
Name: "Diablo\Local\Deusch"; Description: Немецкая; Flags: exclusive collapsed disablenouninstallwarning


Name: "Diablo\patch"; Description: Версия; Flags: collapsed disablenouninstallwarning

Name: "Diablo\patch\100"; Description: 1.00; Flags: exclusive collapsed disablenouninstallwarning; Types: full
Name: "Diablo\patch\107"; Description: 1.07; Flags: exclusive collapsed disablenouninstallwarning
Name: "Diablo\patch\108"; Description: 1.08; Flags: exclusive collapsed disablenouninstallwarning
Name: "Diablo\patch\109"; Description: 1.09; Flags: exclusive collapsed disablenouninstallwarning
Name: "Diablo\patch\109b"; Description: 1.09b; Flags: exclusive collapsed disablenouninstallwarning
Name: "Diablo\NoCD"; Description: No-CD; Flags: disablenouninstallwarning; Types: full
///фиксирован
Name: "Diablo\UPD"; Description: Активировать UPD; Flags: disablenouninstallwarning fixed; Types: full



Name: "Hellfire"; Description: Hellfire; Flags: exclusive disablenouninstallwarning ;
Name: "Hellfire\Local"; Description: Локализация; Flags: disablenouninstallwarning
Name: "Hellfire\Local\Russian"; Description: Русская; Flags: exclusive collapsed disablenouninstallwarning; ExtraDiskSpaceRequired: 518540567
Name: "Hellfire\Local\Russian\Stream"; Description: Stream; Flags: exclusive collapsed disablenouninstallwarning;
Name: "Hellfire\Local\Russian\Fargus"; Description: Фаргус; Flags: exclusive disablenouninstallwarning;
Name: "Hellfire\Local\Englisch"; Description: Английская; Flags: exclusive collapsed disablenouninstallwarning
Name: "Hellfire\patch"; Description: Версия; Flags: collapsed disablenouninstallwarning
Name: "Hellfire\patch\100"; Description: 1.00; Flags: exclusive disablenouninstallwarning
Name: "Hellfire\patch\101"; Description: 1.01; Flags: exclusive collapsed disablenouninstallwarning
Name: "Hellfire\patch\102"; Description: 1.02; Flags: exclusive collapsed disablenouninstallwarning
Name: "Hellfire\NoCD"; Description: No-CD; Flags: disablenouninstallwarning


Name: "Hellfire\Hide"; Description: Скрытые возможности; Flags: collapsed disablenouninstallwarning
Name: "Hellfire\Hide\multitest"; Description: Мультиплеер; Flags: disablenouninstallwarning collapsed;
Name: "Hellfire\Hide\multitest\udp"; Description: Активировать UDP; Flags: disablenouninstallwarning
Name: "Hellfire\Hide\NestArt"; Description: Статичная палитра Улья; Flags: disablenouninstallwarning dontinheritcheck;
Name: "Hellfire\Hide\bardtest"; Description: Класс - Бард; Flags: disablenouninstallwarning;
Name: "Hellfire\Hide\Barbariantest"; Description: Класс - Варвар; Flags: disablenouninstallwarning;
Name: "Hellfire\Hide\theoquest"; Description: Квест от Цилии; Flags: disablenouninstallwarning;
Name: "Hellfire\Hide\FarmersOrchard"; Description: Квест от фермера Лестера; Flags: exclusive disablenouninstallwarning
Name: "Hellfire\Hide\cowquest"; Description: Квест от Полного Психа; Flags: exclusive disablenouninstallwarning

а теперь запусти и вылетит ошибка подтверждающая всё вышесказанное

читать дальше »

Код:

---------------------------
Ошибка
---------------------------
Radio item cannot have disabled child items.
---------------------------
ОК   
---------------------------

просто нужно при выборе A, выбиралось и B и если потом убрать галку с B, от галка(точка) уберётся и с A, НО не блокируй! (смысл? если они и так друг от друга зависят)
а у тебя в коде через раз блокировка и потому всё виснет,

и мой тебе совет
сделай окошко выбора компонентов больше по вертикали. Еслим внизу поставить галку, а вверху (где не видно) галка снимется (которая важнее той что снизу, но пользватель не видит, что её уже нет), то получится нехорошо

[Raf-9600]

а теперь запусти и вылетит ошибка подтверждающая всё вышесказанное »

Хмм... Хорошо. Выбери немецкую локализацию Diablo, поставь флажок напротив "Активировать UDP", а потом кликни на Hellfire. В результате "Активировать UDP" заблокируется, но инсталлятор не зависнет.
А вот если, к примеру, сделать все то же самое, но выбрать английскую локализацию, то инсталлятор зависнет... Либо мистика, либо я чего-то не догоняю

и мой тебе совет сделай окошко выбора компонентов больше по вертикали. Еслим внизу поставить галку, а вверху (где не видно) галка снимется (которая важнее той что снизу, но пользватель не видит, что её уже нет), то получится нехорошо »

Такого у меня нет. Я рассчитывал, что пользователь выбирает компоненты сверху в низ, и соответственно, выбрав нижний компонент, с тем, что выше него, уже ничего не произойдет.

[Johny777]

Raf-9600,
выпей водяры и
начни сначала
но без строк WizardForm.ComponentsList.ItemEnabled[31]:=False или True
а заместо них
wizardform.ComponentsList.Checked[1]:=True; или False
никакой мистики
это просто вынос мозга

[Raf-9600]

НО не блокируй! (смысл? если они и так друг от друга зависят) »

Не все так просто. К примеру, немецкая локализация может работать только на версии 1.09b. Так почему бы выбрав её, не заблокировать другие версии игры, чтобы пользователь не путался?

[Johny777]

при выборе A, выбиралось и B и если потом убрать галку с B, от галка(точка) уберётся и с A »

Код:

если выбран компонен "немецкая локализация" то
  If IsComponentSelected('немецкая локализация') then
начинаем
    begin
      WizardForm.ComponentsList.Checked[номер]:=True   1.09b патч отмечен (если он относится к радиокнопке, то 2 другие не отмечены). Если это чекбокс то снизу в этом же куске приписываешь, что они не отмечены, а чекбокс этога патча отмечен
      OldEvent_ComponentsListClickCheck(Sender);
    end  конец
в противном случае
  else
    begin
      WizardForm.ComponentsList.Checked[номер]:=false патч не отмечен
    end;
end;

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

[Raf-9600]

wizardform.ComponentsList.Checked[1]:=True; или False »

Выглядит не так симпатично как с ItemEnabled, но как резервный вариант решения ситуации вполне катит.

Но если ты его ещё и заблокируешь, то всё зависнет в блокировке просто нет смысла! »

Блокировка визуально красиво выглядит (^_^)
Хоть ты и прав, но я ещё поколдую над ItemEnabled.

[Johny777]

я ещё поколдую над ItemEnabled. »

радиатор с кучей рёбрышек на мозг не забудь поставить!
и ты используешь флаг collapsed
не забудь тогда приписать в InitializeWizard; строку
WizardForm.ComponentsList.TreeViewStyle := True;

[Raf-9600]

и ты используешь флаг collapsed не забудь тогда приписать в InitializeWizard; строку WizardForm.ComponentsList.TreeViewStyle := True; »

Я прописываю ComponentsListTVStyle=true в секции [Setup]

[Raf-9600]

Я добился своего. Везде где был прописан ItemEnabled там он и остался. К ним я лишь добавил правила снятия галочек с Hellfire\Hide\Barbariantest и Diablo\UPD

[Raf-9600]

Ктонить может перенести задачу из батника в секцию [Run] инсталлятора? Т.е. нужно чтобы действие выполнялись без bat файла, напрямую через cmd.exe

Код:

@Echo Off
For /F "tokens=*" %%i In (123.txt) Do <nul set /p $WRT="%%i. Good Bye" >123.txt
pause&goto :Eof