inno-setup-v6 - 如何在 Inno 设置中将个人页面添加到中间
问题描述
我使用 Inno setup 来创建个人页面,但它出现在安装的第一个页面中。
如何更改页面的位置?
procedure Key_Form_KeyChange(Sender: TObject);
begin
if((length(ed1.Text) <= 6)) then
WizardForm.NextButton.Enabled := True
else
WizardForm.NextButton.Enabled := False;
end;
procedure InitializeWizard();
begin
myPage:=CreateCustomPage(wpWelcome, 'Server Ip Setting', 'IP Setting');
Lbl1 := TNewStaticText.Create(myPage);
Lbl1.Left := ScaleX(10);
Lbl1.Top := ScaleY(5);
Lbl1.Width := ScaleX(100);
Lbl1.Height := ScaleY(50);
Lbl1.Caption := 'IP';
Lbl1.Parent := myPage.Surface;
ed1:=TEdit.Create(myPage);
ed1.Width:=ScaleX(100);
ed1.Left := ScaleY(10);
ed1.Top := ScaleY(25);
ed1.Text :='192.168.1.110';
ed1.Parent:=myPage.Surface;
ed1.OnChange := @Key_Form_KeyChange;
Lbl1 := TNewStaticText.Create(myPage);
Lbl1.Left := ScaleX(200);
Lbl1.Top := ScaleY(5);
Lbl1.Width := ScaleX(100);
Lbl1.Height := ScaleY(50);
end;
解决方案
推荐阅读
- r - 添加缺失列后覆盖R中列表的元素
- r - R:当有额外的因子水平时再现原始虚拟矩阵
- sorting - 为什么快速排序 O(n)?
- docker - Docker - 您可以在集群中的节点上创建容器而不是服务吗?
- python - 未添加 Python 变量值
- swiftui - 在 SwiftUI 中使用 ScrollViewReader 如何突出显示我滚动到的行?
- git - 如何为这个特定场景设置 git?
- powerbi - 如何在记分卡/文本框 POWER BI 中始终将比率显示为百分比
- javascript - 如何从组件的操作中动态改变 Storybook v6 中的“args”?
- python - 转换为 libsvm 时保留 Spark Dataframe 的顺序