Inno setup INNO设置:如何调整组件内部窗口

Inno setup INNO设置:如何调整组件内部窗口,inno-setup,Inno Setup,我正在尝试创建一个自定义组件窗口。到目前为止,我在stackoverflow上找到了一些代码,可以设置components窗口的outerwindow高度。我的问题是,实际的组件选择框并没有随着它增长,就像我有一个大窗口,但仍然是一个小组件选择框 我的问题图片: 希望有人能帮我 我的密码是 var DefaultTop, DefaultLeft, DefaultHeight, DefaultBackTop, DefaultNextTop, DefaultCanc

我正在尝试创建一个自定义组件窗口。到目前为止,我在stackoverflow上找到了一些代码,可以设置components窗口的outerwindow高度。我的问题是,实际的组件选择框并没有随着它增长,就像我有一个大窗口,但仍然是一个小组件选择框

我的问题图片:

希望有人能帮我

我的密码是

var
  DefaultTop, 
  DefaultLeft, 
  DefaultHeight,
  DefaultBackTop, 
  DefaultNextTop, 
  DefaultCancelTop,
  DefaultBevelTop, 
  DefaultOuterHeight: Integer;

const 
  LicenseHeight = 600;
  LicenseWidth = 600;

procedure InitializeWizard();
begin
  DefaultTop := WizardForm.Top;
  DefaultLeft := WizardForm.Left;
  DefaultHeight := WizardForm.Height;
  DefaultBackTop := WizardForm.BackButton.Top;
  DefaultNextTop := WizardForm.NextButton.Top;
  DefaultCancelTop := WizardForm.CancelButton.Top;
  DefaultBevelTop := WizardForm.Bevel.Top;    
end;

procedure CurPageChanged(CurPageID: Integer);
begin
  if CurPageID = wpSelectComponents then
  begin
    WizardForm.Top := DefaultTop - (LicenseHeight - DefaultHeight) div 2;
    WizardForm.Height := LicenseHeight;
    WizardForm.Width := LicenceWidth;
    WizardForm.OuterNotebook.Height := WizardForm.OuterNotebook.Height + (LicenseHeight - DefaultHeight);
    WizardForm.CancelButton.Top := DefaultCancelTop + (LicenseHeight - DefaultHeight);
    WizardForm.NextButton.Top := DefaultNextTop + (LicenseHeight - DefaultHeight);
    WizardForm.BackButton.Top := DefaultBackTop + (LicenseHeight - DefaultHeight);
    WizardForm.Bevel.Top := DefaultBevelTop + (LicenseHeight - DefaultHeight);
  end
  else 
  begin
    WizardForm.Top := DefaultTop;
    WizardForm.Left := DefaultLeft;
    WizardForm.Height := DefaultHeight;
    WizardForm.OuterNotebook.Height := DefaultOuterHeight;
    WizardForm.CancelButton.Top := DefaultCancelTop;
    WizardForm.NextButton.Top := DefaultNextTop;
    WizardForm.BackButton.Top := DefaultBackTop;
    WizardForm.Bevel.Top := DefaultBevelTop;
  end;
end;

我想我缺少了像“WizardForm.Height”这样的innerbox控件作为高度。我找不到控制组件菜单内框的那个。对不起,我想我不明白。内部框是指窗口(或控件)的客户端部分吗?如果是这样,那么就有和属性可用。我的问题的图片,比如我的外部窗口很大,但选择的东西仍然很小。这正是我想要的,我该如何用脚本修改宽度?我明白了。嗯,嗯,那是相当多的洗牌。对于垂直方向,我很久以前就知道了。您甚至可以为水平方向扩展该脚本。Inno Setup Pascal脚本不发布
锚定
属性,因此必须手动执行所有这些操作。可怜。这可以节省很多工作。