以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  窗口RESIZE后被遮挡了,怎么弄?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=129532)

--  作者:dokings
--  发布时间:2018/12/30 18:12:00
--  窗口RESIZE后被遮挡了,怎么弄?

sizechanged事件,写如下代码

 

Dim frm = e.Form.panel.parent.parent
If frm IsNot Nothing Then
    frm.height = e.Form.height
End If



之前有请教过版主去除共有窗口多余的空白,,,版主给了上面那段代码。 
但是实际适用中有些问题,,,就是只要窗口大小有变化,共有窗体就会被遮挡住,甚至被完全盖住。 只能关闭重新激活窗体。

有没有办法能解决这个问题? 窗体变动时,共有窗口能不被遮住,也不会变形出多余的空白。


[此贴子已经被作者于2018/12/30 18:12:41编辑过]

--  作者:dokings
--  发布时间:2018/12/30 18:14:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:byear.rar


--  作者:有点甜
--  发布时间:2018/12/30 18:51:00
--  

改成具体的高度

 

Dim frm = e.Form.panel.parent.parent
If frm IsNot Nothing Then
    frm.height = 30
End If