InnoSetup, предотвратить установку, если любая задача выбрана

Question

Мой Inno скрипт имеет две задачи:

[Tasks] 
Name: client; Description: Install FTP client 
Name: server; Description: Install FTP server 

Я хотел бы запретить установку в ненавязчивым способом, если выбран какой-либо задачи, для non.intrusive I например, включение/выключение «следующей» кнопки, когда проверяется одна из двух задач, нет рекламного блока messagbe.

Я не уверен, если InnoSetup имеет параметр или функцию «проверить», чтобы сделать это простым способом

Как я могу это сделать?

Answer 1

Невозможно сделать то, что вы хотите изначально в Inno Setup. Вам нужно будет сделать это из кода самостоятельно.

Вы можете немного обмануть здесь, используя функцию WizardSelectedTasks. Эта функция возвращает список избранных задач (или описаний), разделенных запятыми, и поэтому возвращает пустую строку, если не выбрана никакая задача. Остальное о связывании списка задач OnClickCheck события, и обновлении следующей кнопки включения состояния и писать кусок кода для инициализации следующего состояния кнопки:

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

[Tasks] 
Name: client; Description: Install FTP client 
Name: server; Description: Install FTP server 

[Code] 
// helper function 
function IsAnyTaskSelected: Boolean; 
begin 
    Result := WizardSelectedTasks(False) <> ''; 
end; 

// event handler for setting the next button initial state when 
// entering the tasks page 
procedure CurPageChanged(CurPageID: Integer); 
begin 
    if CurPageID = wpSelectTasks then 
    WizardForm.NextButton.Enabled := IsAnyTaskSelected; 
end; 

// method of the task list check click event 
procedure TasksListClickCheck(Sender: TObject); 
begin 
    WizardForm.NextButton.Enabled := IsAnyTaskSelected; 
end; 

procedure InitializeWizard; 
begin 
    WizardForm.TasksList.OnClickCheck := @TasksListClickCheck; 
end;