Inno setup 如何在Inno设置中创建可滚动单选按钮列表？

我创建了一个向导，允许用户从selection from（选择自）单选按钮中进行选择，但当选择超过对话框大小时，我遇到了问题，它将不会显示其余选择，如下图所示：

我希望使用滚动条，但很难在网上找到教程。有人能帮忙吗

对于代码：=0到9 do
开始
复选框：=TNewCheckListBox.Create（第页）；
CheckBox.Parent:=Page.Surface；
AddCheckBox（'test'，''，0，True，False，False，True，nil）；
复选框.AddRadioButton（'1'，''，1，True，True，nil）；
复选框.AddRadioButton（'2'，''，1，False，True，nil）；
结束

为所有复选框和单选按钮创建一个大的

TNewCheckListBox

，而不是为每组创建一个单独的框。如果滚动条的内容不合适，则

TNewCheckListBox

将自动显示滚动条

函数CustomPage（变量页：TWizardPage；PageId:Integer）：整数；
变量
CheckListBox:TNewCheckListBox；
开始
页面：=CreateCustomPage（页面ID、ExpandConstant（'AAA'）、ExpandConstant（'BBB'））；
CheckListBox:=TNewCheckListBox.Create（第页）；
使用CheckListBox开始
父项：=Page.Surface；
左：=ScaleX（0）；
顶部：=ScaleY（50）；
宽度：=ScaleX（413）；
高度：=斯卡利（153）；
AddCheckBox（ExpandConstant（'Test'），''，0，False，True，False，True，Nil）；
AddRadioButton（ExpandConstant（'1'），''，1，True，True，Nil）；
AddRadioButton（ExpandConstant（'2'），''，1，False，True，Nil）；
AddCheckBox（ExpandConstant（'Test'），''，0，False，True，False，True，Nil）；
AddRadioButton（ExpandConstant（'1'），''，1，True，True，Nil）；
AddRadioButton（ExpandConstant（'2'），''，1，False，True，Nil）；
AddCheckBox（ExpandConstant（'Test'），''，0，False，True，False，True，Nil）；
AddRadioButton（ExpandConstant（'1'），''，1，True，True，Nil）；
AddRadioButton（ExpandConstant（'2'），''，1，False，True，Nil）；
AddCheckBox（ExpandConstant（'Test'），''，0，False，True，False，True，Nil）；
AddRadioButton（ExpandConstant（'1'），''，1，True，True，Nil）；
AddRadioButton（ExpandConstant（'2'），''，1，False，True，Nil）；
结束；
结果：=Page.ID；
结束；
过程初始化Wizard（）；
变量
新网页：TWizardPage；
NewPageID：整数；
开始
NewPageID:=CustomPage（NewPage，wpWelcome）；
结束；

例2：

function CustomPage(var Page:TWizardPage;PageId:Integer):Integer;
var
  CheckBox: TNewCheckListBox;     
  I:Integer;
begin
  Page:=CreateCustomPage(PageId,ExpandConstant('AAA'),ExpandConstant('BBB'));
  CheckBox:=TNewCheckListBox.Create(Page);
  with CheckBox do begin       
    Parent:=Page.Surface;       
    Left := ScaleX(0);
    Top := ScaleY(56);
    Width := ScaleX(413);
    Height := ScaleY(153);
    for I:=0 to 9 do begin       
      AddCheckBox('test', '', 0, True, False, False, True, nil); 
      AddRadioButton('1', '', 1, True, True, nil ); 
      AddRadioButton('2', '', 1, False,True, nil );             
    end;
  end;
end;

---

是否手动创建单选按钮列表（使用pascal脚本）？或者它是Inno Setup从

[Tasks]

部分创建的任务列表？下面是我的潜行代码*它在0到9的代码

code

中得到一个循环do begin CheckBox:=TNewCheckListBox.Create（第页）；CheckBox.Parent:=Page.Surface；AddCheckBox（“测试“，”，0，真，假，假，真，零）；复选框.AddRadioButton（'1'，''，1，True，True，nil）；复选框.AddRadioButton（'2'，''，1，False，True，nil）；结束

code

Martin，我正在使用pascal脚本