专家坐堂-关于drawcell，提示出错Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于drawcell，提示出错  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=138337)

--  作者：heixuel
--  发布时间：2019/7/29 10:20:00
--  关于drawcell，提示出错

If e.Col.Name = "图档" AndAlso e.Row("图档") > "" Then
e.StartDraw()
e.Graphics.DrawImage(getImage(ProjectPath & "Attachments\\" & e.Row("图档")),e.x,e.y,e.width,e.height)
e.text = ""
e.EndDraw()
End If

--  作者：heixuel
--  发布时间：2019/7/29 10:29:00
--
图片不显示

--  作者：有点酸
--  发布时间：2019/7/29 10:41:00
--

If e.Col.Name = "图档" AndAlso e.Row("图档") > "" Then
if e.Row.Isnull("图档") = False AndAlso FileSys.FileExists( ProjectPath & "Attachments\\" & e.Row("图档")) Then
e.StartDraw()
e.Graphics.DrawImage(getImage(ProjectPath & "Attachments\\" & e.Row("图档")),e.x,e.y,e.width,e.height)
e.text = ""
e.EndDraw()
End if
End If

--  作者：heixuel
--  发布时间：2019/7/29 13:35:00
--
谢谢，貌似可以了。高手云集这里