checkbox - 向标准 Inno Setup 页面添加其他控件？

Question

如何将复选框添加到由 Inno Setup 创建的文件夹选择对话框中，如下图所示？

这不是自定义对话框。它由 Inno Setup 自动创建。

标签： checkboxinno-setuppascalscript

Answer 1

将Parent复选框的属性设置为WizardForm.SelectDirPage：

var
  Checkbox: TNewCheckBox;

procedure InitializeWizard();
begin
  Checkbox := TNewCheckBox.Create(WizardForm.SelectDirPage);
  Checkbox.Parent := WizardForm.SelectDirPage;
  Checkbox.Top := WizardForm.DirEdit.Top + WizardForm.DirEdit.Height + ScaleY(8);
  Checkbox.Left := WizardForm.DirEdit.Left;
  Checkbox.Caption := 'My checkbox';
  // See https://stackoverflow.com/q/30469660/850848
  Checkbox.Height := ScaleY(Checkbox.Height);
end;