- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]遮罩窗口问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=89590)
-- 发布时间：2016/8/25 9:45:00
-- [求助]遮罩窗口问题
如何实现遮罩窗口大小位置与一控件（面板）一致。
谢谢
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
-- 发布时间：2016/8/25 9:49:00
--
面板和窗口大小一致，把面板停靠设置为fill格式就可以吧
-- 发布时间：2016/8/25 10:05:00
--
主要是：位置不好确定。
特别是面板控件的坐标位置和遮罩窗口的坐标位置。
[此贴子已经被作者于2016/8/25 10:06:23编辑过]
-- 发布时间：2016/8/25 10:13:00
--
Dim ft As Integer = e.Form.baseform.Top
Dim fl As Integer = e.Form.baseform.left
Dim sp1 As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
Dim p1t As Integer =sp1.Top
Dim p1l As Integer =sp1.Panel1.width
Dim pnl As WinForm.Panel = e.Form.Controls("Panel1")
Forms("遮罩窗口").show()
Forms("遮罩窗口").SetBounds(fl+p1l+10,ft+p1t+30,pnl.Width,pnl.Height)
如果不用窗口，简单一点，就另外放一个panel和面板同一层次，平时隐藏，需要的时候置顶显示