以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 图片加载 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=147781) |
-- 作者:fendouww -- 发布时间:2020/3/24 9:09:00 -- 图片加载 我使用了缩略图显示,正常鼠标滚动没有问题,但使用拖动条时就会报错,有解决办法吗? If e.Col.Name = "图片" Then If FileSys.FileExists("\\\\10.100.100.129\\产品中心\\foxtable资料\\图片\\" & "缩略图_" & e.Row("图片").trim("\\")) Then e.Graphics.DrawImage(getImage("\\\\10.100.100.129\\产品中心\\foxtable资料\\图片\\" & "缩略图_" & e.Row("图片").trim("\\")),e.x +1,e.y+1,e.Width - 2,e.Height - 2) e.Text = "" End If |
-- 作者:有点蓝 -- 发布时间:2020/3/24 9:30:00 -- 试试 If e.Col.Name = "图片" Then dim str as string = "\\\\10.100.100.129\\产品中心\\foxtable资料\\图片\\缩略图_" & e.Row("图片").trim("\\") If FileSys.FileExists(str) Then e.Graphics.DrawImage(getImage(str),e.x +1,e.y+1,e.Width - 2,e.Height - 2) e.Text = "" End If End If |
-- 作者:fendouww -- 发布时间:2020/3/24 10:18:00 -- 还是会出现 ![]() |
-- 作者:有点蓝 -- 发布时间:2020/3/24 10:40:00 -- 请上传实例测试 |
-- 作者:fendouww -- 发布时间:2020/3/24 10:45:00 -- 密码888 |
-- 作者:fendouww -- 发布时间:2020/3/24 14:28:00 -- 为什么传不上附件? |
-- 作者:有点蓝 -- 发布时间:2020/3/24 14:45:00 -- 参考:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=78 上传不成功,重复多试几次
|
-- 作者:fendouww -- 发布时间:2020/3/25 9:03:00 -- 请查看下附件888 [此贴子已经被作者于2020/3/25 9:04:28编辑过]
|