Foxtable(狐表)用户栏目专家坐堂 → 关于共有窗口的隐藏问题


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

主题:关于共有窗口的隐藏问题

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


加好友 发短信
等级:七尾狐 帖子:1691 积分:16460 威望:0 精华:0 注册:2013/7/31 13:03:00
关于共有窗口的隐藏问题  发帖心情 Post By:2017/7/8 11:33:00 [只看该作者]

为了说明问题,做了一个例子
窗口1,共有,属性隐藏,内置目录树,在目录树内选择节点(a1,a2,b1,b2)后,打开相应窗口。
我的问题是,选择节点后,共有窗口1立即隐藏起来,现在情况是:选择节点打开相应窗口后,需要用鼠标在窗口1外点击一下才能隐藏。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:求助共用窗口.foxdb




 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110562 积分:562700 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By: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
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1691 积分:16460 威望:0 精华:0 注册:2013/7/31 13:03:00
  发帖心情 Post By:2017/7/8 15:44:00 [只看该作者]

谢谢,构思很巧妙,但是,如果节点名称和窗口名称不一致呢?

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110562 积分:562700 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/7/8 15:59:00 [只看该作者]

用一个全局变量记录最后打开的窗口

MouseLeave事件
forms(vars("窗口名称")).Select

节点选择事件

vars("窗口名称") = "窗口1"
forms(vars("窗口名称")).show

 回到顶部