Installation 如何减少Inno Setup TInputQueryWizardPage（CreateInputQueryPage）上两个输入框之间的行距

我有一个

TInputQueryWizardPage

页面，有8个用户输入。但所有值仍然不可见。是否有办法减小两个值之间的行距，以便所有值都以当前向导大小显示

---

使用

TInputQueryWizardPage.Edits

和

TInputQueryWizardPage.PromptLabels

访问控件并根据需要重新定位它们：

[代码]
过程缩减压缩空间（页面：TInputQueryWizardPage；计数：整数；增量：整数）；
变量
I：整数；
开始
对于I:=1计数-1 do
开始
Page.Edits[I]。Top:=Page.Edits[I]。Top-Delta*I；
Page.PromptLabels[I]。Top:=Page.PromptLabels[I]。Top-Delta*I；
结束；
结束；
过程初始化Wizard（）；
变量
页面：TInputQueryWizardPage；
开始
页面：=CreateInputQueryPage（欢迎使用，
“个人信息”、“你是谁？”，
“请指定您的姓名和您工作的公司，然后单击“下一步”。）；
Page.Add（'Prompt 1:'，False）；
Page.Add（'Prompt 2:'，False）；
Page.Add（'Prompt 3:'，False）；
Page.Add（'Prompt 4:'，False）；
Page.Add（'Prompt 5:'，False）；
缩减压缩空间（第5页，ScaleY（10））；
结束；

标准布局：

间距减少10像素的布局：