以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  单元格绘制按钮问题drawimage  (http://www.foxtable.com/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