以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  窗体中tables控件的焦点?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=40803)

--  作者:jnletao
--  发布时间:2013/9/30 9:37:00
--  窗体中tables控件的焦点?
我窗体里大多有多个tables控件,并且我想着每个tables控件的第一行都能有一个浮动框的提示
关于浮动框的提示我现在是这样做的

表的_MouseEnterCell事件

 

If e.Col.Name = "FabricYarn" Then

    Dim str As String = ""

    For Each c As Col In e.Table.Cols

        str += c.Caption & ":" & e.Row(c.Name) & vbcrlf

    Next

    e.Table.ShowToolTip(str,e.Row,e.Col)

End If

 

表的_MouseLeaveCell事件

 

If e.Col.Name = "FabricYarn" Then

    e.Table.HideToolTip()

End If


由于表很多,每个表都单独设置非常麻烦!


问题1,在全局表里设置以上事件,以上代码就不能指定 列名了,而要判断是否是第一列,这个我不清楚怎么判断,请指教!


问题2,在窗体里,只有我单击激活各tables控件,才能显示浮动框,用什么代码 能判断我的鼠标 进入 该tables区域,该tables自动激活(Focus)?


--  作者:Bin
--  发布时间:2013/9/30 9:45:00
--  
1.  e.Col.Index=0    就可以判断是否第一列了

2. 鼠标进入区域自然就回触发_MouseEnterCell事件了

--  作者:jnletao
--  发布时间:2013/9/30 10:08:00
--  
放上截图动画,与源码,请大能解惑!

图片点击可在新窗口打开查看此主题相关图片如下:111.gif
图片点击可在新窗口打开查看
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:窗体中tables控件自动激活.table



--  作者:Bin
--  发布时间:2013/9/30 10:18:00
--  
这个没有办法处理了,表控件没有对应事件.
--  作者:有点甜
--  发布时间:2013/9/30 23:40:00
--  

 只能通过获取鼠标的位置,然后判断是否在某一个范围内,如果是,就某控件获得焦点。不过不建议这样做。