以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  关于共有窗口的隐藏问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=103441)

--  作者：czy66ds --  发布时间：2017/7/8 11:33:00 --  关于共有窗口的隐藏问题 为了说明问题，做了一个例子 窗口1，共有，属性隐藏，内置目录树，在目录树内选择节点（a1,a2,b1,b2）后,打开相应窗口。 我的问题是，选择节点后，共有窗口1立即隐藏起来，现在情况是：选择节点打开相应窗口后，需要用鼠标在窗口1外点击一下才能隐藏。  下载信息  [文件大小：   下载次数： ] 点击浏览该文件:求助共用窗口.foxdb

--  作者：有点蓝 --  发布时间：2017/7/8 12:33:00 --   共有窗口MouseLeave事件 Dim node As WinForm.TreeNode = e.Form.Controls("TreeView1").selectedNode If node IsNot Nothing AndAlso node.Level = 1     forms(node.Text).Select End If

--  作者：czy66ds --  发布时间：2017/7/8 15:44:00 --   谢谢，构思很巧妙，但是，如果节点名称和窗口名称不一致呢？

--  作者：有点蓝 --  发布时间：2017/7/8 15:59:00 --   用一个全局变量记录最后打开的窗口 MouseLeave事件 forms(vars("窗口名称")).Select 节点选择事件 vars("窗口名称") = "窗口1" forms(vars("窗口名称")).show