Inno Setup：別のコンポーネントが選択されている場合、コンポーネントを自動選択する方法は？

Question

特定のコンポーネントもインストールされている場合にのみインストールする必要があるファイルがあります。しかし、カスタムインストールも許可します。したがって、特定のコンポーネントもチェックされている場合はコンポーネントを自動チェックする必要があります（その逆もあり、他のコンポーネントが有効でない場合は無効にします）。私は単にファイル自体を特定のコンポーネントに添付することができますが、この前提条件がインストールされているというフィードバックをユーザーに提供したいと思います。

ショートバージョン：コンポーネント 'B'のステータスを確認するためにコンポーネント 'A'を自動チェックする方法はありますか？

Answer 1

Bをチェックするための簡単な実装、Aがチェックされた場合：

[Components] 
Name: "A"; Description: "A" 
Name: "B"; Description: "B" 

[Code] 

const 
    ItemA = 0; 
    ItemB = 1; 

var 
    PrevItemAChecked: Boolean; 
    TypesComboOnChangePrev: TNotifyEvent; 

procedure ComponentsListCheckChanges; 
begin 
    if PrevItemAChecked <> WizardForm.ComponentsList.Checked[ItemA] then 
    begin 
    if WizardForm.ComponentsList.Checked[ItemA] then 
     WizardForm.ComponentsList.Checked[ItemB] := True; 

    PrevItemAChecked := WizardForm.ComponentsList.Checked[ItemA]; 
    end; 
end; 

procedure ComponentsListClickCheck(Sender: TObject); 
begin 
    ComponentsListCheckChanges; 
end; 

procedure TypesComboOnChange(Sender: TObject); 
begin 
    { First let Inno Setup update the components selection } 
    TypesComboOnChangePrev(Sender); 
    { And then check for changes } 
    ComponentsListCheckChanges; 
end; 

procedure InitializeWizard(); 
begin 
    WizardForm.ComponentsList.OnClickCheck := @ComponentsListClickCheck; 

    { The Inno Setup itself relies on the WizardForm.TypesCombo.OnChange, } 
    { so we have to preserve its handler. } 
    TypesComboOnChangePrev := WizardForm.TypesCombo.OnChange; 
    WizardForm.TypesCombo.OnChange := @TypesComboOnChange; 

    { Remember the initial state } 
    { (by now the components are already selected according to } 
    { the defaults or the previous installation) } 
    PrevItemAChecked := WizardForm.ComponentsList.Checked[ItemA]; 
end; 

---

は上記Inno Setup ComponentsList OnClick eventに基づいています。

インデックスを使用する代わりに、Inno Setup Uncheck a task when another task is checkedと同様にコンポーネント名と説明を使用することもできます。