Foxtable(狐表)用户栏目专家坐堂 → 单元格图片


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

主题:单元格图片

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


加好友 发短信
等级:幼狐 帖子:164 积分:1377 威望:0 精华:0 注册:2018/7/18 18:48:00
单元格图片  发帖心情 Post By:2019/7/12 17:40:00 [只看该作者]

单元格图片列,有一个单元格不能找到匹配的图片时,其它的所有单元格图片都不能显示!请问要如何避免这种情况?代码要如何写?
If e.Col.name= "图片" Then
    e.StartDraw
    If e.Row("图片") > "" Then
        e.Graphics.DrawImage(getimage(projectPath & "attachments\" & e.Row("图片")), e.x + 3,e.y + 3, 50, 50) '绘制第一个图标
    End If
    e.text = ""
    e.EndDraw
End If
[此贴子已经被作者于2019/7/12 17:40:22编辑过]

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


加好友 发短信
等级:超级版主 帖子:105470 积分:536335 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/7/12 20:36:00 [只看该作者]

If e.Col.name= "图片" Then
    e.StartDraw
    If e.Row("图片") > "" Then
        Dim file As String = projectPath & "attachments\" & e.Row("图片")
        If FileSys.FileExists(file) Then
            e.Graphics.DrawImage(getimage(file), e.x + 3,e.y + 3, 50, 50) '绘制第一个图标
        End If
    End If
    e.text = ""
    e.EndDraw
End If

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


加好友 发短信
等级:幼狐 帖子:164 积分:1377 威望:0 精华:0 注册:2018/7/18 18:48:00
厉害了!  发帖心情 Post By:2019/7/13 7:50:00 [只看该作者]

谢谢!


 回到顶部