首页 > 解决方案 > 如何在 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;

标签: inno-setup-v6

解决方案


推荐阅读