问题描述
我使用 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;
解决方法
暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!
如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。
小编邮箱:dio#foxmail.com (将#修改为@)