以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何移动鼠标填充单元格颜色  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=130316)

--  作者:z769036165
--  发布时间:2019/1/18 16:12:00
--  如何移动鼠标填充单元格颜色
如何在表单元格移动鼠标,自动填充对应单元格的颜色
--  作者:有点甜
--  发布时间:2019/1/18 18:37:00
--  

参考

 

http://www.foxtable.com/webhelp/scr/2678.htm

 

http://www.foxtable.com/webhelp/scr/0656.htm

 


--  作者:z769036165
--  发布时间:2019/1/19 9:38:00
--  
这个在绘制里面怎么做单元格的判断呢?还是只能通过鼠标进入记录行的位置,写入全局代码,然后在绘制里面获取判断单元格变化吗?
--  作者:wyz20130512
--  发布时间:2019/1/19 10:20:00
--  
1.在全局代码中定义两个记录单元格坐标的全局变量
Public Rpoint As Integer
Public Cpoint As Integer

2.项目Initialize事件代码
DataTables("表C").AddUserStyle("c",Color.Green,Color.black)

3.MouseEnterCell事件代码
Rpoint = e.Row.Index
Cpoint = e.Col.Index

4.DrawCell事件代码
If e.Col.Index = Cpoint And e.Row.Index = Rpoint Then
    e.Style = "c"
End If

--  作者:有点蓝
--  发布时间:2019/1/19 10:20:00
--  
是的,MouseEnterCell事件使用全局变量记录单元格位置