主题：[求助]单元格绘制问题

如何实现：当鼠标停留在某一行时，在“删除”列绘制删除按钮？

 

If e.Col.name= "删除" OrElse e.Col.name= "用户名"     Then
    e.StartDraw
    If e.MouseHover = True '如果鼠标在此单元格
        e.Row("删除").Graphics.DrawImage(delimg, e.x + 2,e.y + 2) '绘制图标
    End If
    e.EndDraw
End If

If e.Col.name= "删除" Then
    If e.MouseHover = True '如果鼠标在此单元格
        e.StartDraw
        e.Graphics.DrawImage(getimage("d:\test.jpg"), e.x + 2,e.y + 2) '绘制图标
        e.EndDraw
    End If
End If

 

2楼代码仅实现了，当鼠标停留在删除单元格时绘制，我想实现：当鼠标停留当前行时，在删除单元格绘制。

重复问题不要重复问题啊

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=84054&skin=0

 

 

If e.Col.name= "删除" Then
    If vars("x") = e.Row.Index Then
        e.StartDraw
        e.Graphics.DrawImage(getimage("d:\test.ico"), e.x + 2,e.y + 2) '绘制图标
        e.EndDraw
    End If
End If

 

-----------------------

 

vars("x") = e.Row.Index
e.Table.Refresh