我使用 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;