以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  单元格绘制按钮问题drawimage  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=157379)

--  作者:cyrollin
--  发布时间:2020/10/14 10:17:00
--  单元格绘制按钮问题drawimage
今天打开项目文件,出现单元格绘制按钮问题:

.NET Framework 版本:2.0.50727.9151
Foxtable 版本: 
错误所在事件:表,表名AAAAAAAAAA,DrawCell
详细错误信息:
调用的目标发生了异常。
值不能为空。
参数名: image

===============
全局代码里面设置了:

Public delimg1 As Image = GetImage("delimg1.ico")
Public delimg2 As Image = GetImage("delimg2.ico")

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

表的drawcell事件设置了:
If e.Col.name= "删" Then
    e.StartDraw
    If e.MouseHover = False \'如果鼠标不在此单元格
        e.Graphics.DrawImage(delimg1, e.x + 3,e.y + 3) \'绘制第一个图标
    Else \'如果鼠标在此单元格
        e.Graphics.DrawImage(delimg2, e.x + 2,e.y + 2) \'绘制第二个图标
    End If
    e.EndDraw
End If

==================

这些代码都没动过,今天突然出现错误提示,单元格也不能显示图标按钮了,找不到原因。


--  作者:有点蓝
--  发布时间:2020/10/14 10:23:00
--  
全局代码:

Public delimg1 As Image 
Public delimg2 As Image 

afteropenproject事件
delimg1  = GetImage("delimg1.ico")
delimg2 = GetImage("delimg2.ico")

drawcell事件设置了:
If e.Col.name= "删" Then
    e.StartDraw
    If e.MouseHover = False andalso delimg1 isnot nothing \'如果鼠标不在此单元格
        e.Graphics.DrawImage(delimg1, e.x + 3,e.y + 3) \'绘制第一个图标
    Else \'如果鼠标在此单元格 andalso delimg2 isnot nothing 
        e.Graphics.DrawImage(delimg2, e.x + 2,e.y + 2) \'绘制第二个图标
    End If
    e.EndDraw
End If