Foxtable(狐表)用户栏目专家坐堂 → 求助:新建一窗体,放置面板1,另建一窗体 如何在主窗体启动的时候自动在面板1加载子窗体呢?


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

主题:求助:新建一窗体,放置面板1,另建一窗体 如何在主窗体启动的时候自动在面板1加载子窗体呢?

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


加好友 发短信
等级:版主 帖子:1693 积分:12123 威望:0 精华:7 注册:2013/7/11 10:52:00
  发帖心情 Post By:2014/11/19 15:33:00 [显示全部帖子]

图片点击可在新窗口打开查看

 

 

设计窗口是模式的,预览当然会死机哦!


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


加好友 发短信
等级:版主 帖子:1693 积分:12123 威望:0 精华:7 注册:2013/7/11 10:52:00
  发帖心情 Post By:2014/11/20 11:09:00 [显示全部帖子]

在你打开窗口时判断一下,如果不是独立窗口,就不用

 

 

If e.Form.FormStyle = 2 Then
    Dim PB As WinForm.Panel = e.Form.Controls("Panel1")
    Dim Name As String = e.Link.Name
    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.BaseControl.Controls.Clear
    PB.BaseControl.Controls.add(Forms(Name).BaseForm)
End If


 回到顶部