Foxtable(狐表)用户栏目专家坐堂 → [求助] 加载窗口到TabPage后,原始窗口控件布局发生改变


  共有2845人关注过本帖树形打印复制链接

主题:[求助] 加载窗口到TabPage后,原始窗口控件布局发生改变

帅哥哟,离线,有人找我吗?
15986720145
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:146 积分:1243 威望:0 精华:0 注册:2015/8/7 16:22:00
[求助] 加载窗口到TabPage后,原始窗口控件布局发生改变  发帖心情 Post By:2015/10/13 22:23:00 [显示全部帖子]

加载窗口到TabPage后,原窗口布局发生了改变。

原始窗口中的控件间的间距变大了,求解决办法。

图片点击可在新窗口打开查看此主题相关图片如下:reloaded.gif
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:original.gif
图片点击可在新窗口打开查看

请问怎么设置,才能让载入控件(或者窗口)的窗口的布局和原来一样。

 回到顶部
帅哥哟,离线,有人找我吗?
15986720145
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:146 积分:1243 威望:0 精华:0 注册:2015/8/7 16:22:00
  发帖心情 Post By:2015/10/14 8:13:00 [显示全部帖子]

我是用按钮的Click事件,载入窗口"Test"到控件"TabControl1"的"LLDJ"的子页面中 ,
(利用AfterLoad事件,总是导致死机)Click事件代码如下:

Dim tab As WinForm.TabControl = e.Form.Controls("TabControl1")
Dim Name As String = "Test"    

 '"Test"为将要载入的窗口(模式窗口),控件名为"TabControl1"  TabPage名为"LLDJ" 的子页面中 
' 我特意将TabPage的页面尺寸,设置同窗口"Test"一样大。

Dim pb = tab.BaseControl
Forms(Name).OPEN(-1000,-1500)
Forms(Name).BaseForm.TopLevel = False
Forms(Name).BaseForm.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
Forms(Name).BaseForm.Dock = System.Windows.Forms.DockStyle.Fill
PB.TabPages("LLDJ").Controls.Clear
PB.TabPages("LLDJ").Controls.add(Forms(Name).BaseForm)
tab.SelectedPage = tab.TabPages("LLDJ")

'载入到控件中的窗口,控件间的垂直距离变大了,而且水平距离也有偏移。不知道如何设置,能让控件中的窗口布局回到原始窗口布局。
[此贴子已经被作者于2015/10/14 9:50:17编辑过]

 回到顶部