VSFlexGrid的mouseicon问题

[QZCHY]

当鼠标指向网格的某一行时，如果这行对应的某个字段值(a)>0时，mouseicon改为hand.cur.如果a<=0则mouseicon改为None.该怎么实现呢？
当鼠标指向某行时且mouseicon为hand,单击时怎么知道所指向的行是第几行？
请高手指教！小弟万分感谢！

[ukyoxh]

我想只有通过flexgrid的mousemove事件来实现

通过mousemove事件中,得到鼠标再flexgrid中的坐标,然后再计算所对应的格子

计算格子中的值

不过我的想法很复杂,实现起来很麻烦

只可以供你参考!!

[fishmans]

private sub flexgrid_mousemove(x as integer,y as integer......)
dim mrow as integer'当前光标所在行
dim mcol as integer'当前光标所在列
dim i as integer
dim counti as integer'列宽总计
for i=0 to flexgrid.cols-1
counti=counti+flexgrid.colwidth(i)
if counti>y then
mcol=i
exit for
end if
next
with flexgrid
mrow=cint(x/.rowheight(1))+.toprow
if .textmatrix(mrow,mcol)>0 then
.mouseicon=hand.cur
else
.mouseicon=0
endif
end with
end sub
单击用flexgrid.row可知所指向的是第几行

[daisy8675]

不要亂用mouserow哦，會很麻煩的

[QZCHY]

谢谢两位！我发现了MouseRow、MouseCol，用这两个属性就可以轻松搞定了