Foxtable(狐表)用户栏目专家坐堂 → [求助 ]DrawCell 报错


  共有1986人关注过本帖树形打印复制链接

主题:[求助 ]DrawCell 报错

帅哥哟,离线,有人找我吗?
Cloud
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:156 积分:1328 威望:0 精华:0 注册:2016/6/21 12:27:00
[求助 ]DrawCell 报错  发帖心情 Post By:2018/4/12 11:42:00 [显示全部帖子]

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

 

DrawCell

Select Case e.Table.name
    Case "窗口表"
        Select Case e.Col.Name
            Case "设置权限"
                If e.Row("窗口名称").StartsWith("登陆") OrElse e.Row("窗口名称").StartsWith("窗口") OrElse e.Row("窗口名称").StartsWith("首页") OrElse e.Row("窗口名称").StartsWith("注册") OrElse e.Row("窗口名称").StartsWith("添加") Then
                    e.StartDraw()
                    Dim fnt As New Font("宋体",9)
                    e.Graphics.FillRectangle(Brushes.Gray,e.x,e.y,60,20)
                    e.Graphics.DrawString("禁   止",Fnt,Brushes.white,e.X + 6, e.y + 3)
                    e.EndDraw()
                End If
        End Select
    Case "权限表"
        Select Case e.Col.Name
            Case "窗口名称"
                If e.Row(e.Col.Name) = "" Then
                    e.StartDraw()
                    Dim fnt As New Font("隶书",13)
                    e.Graphics.FillRectangle(Brushes.Gray,e.x,e.y,114,20)
                    e.Graphics.DrawString("导航分组",Fnt,Brushes.white,e.x,e.y)
                    e.EndDraw()
                End If
        End Select
End Select
Select Case e.Table.name
    Case "窗口表","窗口按钮表","权限表"
        Select Case e.Col.Name
            Case "删"
                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 Select
End Select


 回到顶部
帅哥哟,离线,有人找我吗?
Cloud
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:156 积分:1328 威望:0 精华:0 注册:2016/6/21 12:27:00
  发帖心情 Post By:2018/4/12 11:50:00 [显示全部帖子]

Public delimg1 As Image
Public delimg2 As Image

 回到顶部
帅哥哟,离线,有人找我吗?
Cloud
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:156 积分:1328 威望:0 精华:0 注册:2016/6/21 12:27:00
  发帖心情 Post By:2018/4/12 11:53:00 [显示全部帖子]

谢谢,已好了


 回到顶部