Foxtable(狐表) → 用户栏目 → 专家坐堂 → 窗口表单元格内显示图片


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

主题：窗口表单元格内显示图片
帅哥哟，离线，有人找我吗？
yetle
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：858 积分：6381 威望：0 精华：0 注册：2017/2/13 9:04:00 		窗口表单元格内显示图片  发帖心情 Post By：2021/4/14 16:06:00 [只看该作者]

窗口表
图片地址列（nvarchar(255)）值例如：\\10.0.0.11\DRP2images\http10.0.0.180group1M010009CgAAAVtQTWSAZRxiAAAP10ZCIAM413.jpg
窗口表中，能否根据图片地址列在窗口表格单元格内显示图片
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110574 积分：562760 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/4/14 16:16:00 [只看该作者]

参考：http://www.foxtable.com/webhelp/topics/1493.htm 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=150739&skin=0
 回到顶部
帅哥哟，离线，有人找我吗？
yetle
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：858 积分：6381 威望：0 精华：0 注册：2017/2/13 9:04:00 		  发帖心情 Post By：2021/4/14 16:48:00 [只看该作者]

看列子是这么写的，但是不是窗口表，窗口表是slq查询表，没有DrawCell，怎么写？

DrawCell

If e.Col.Name = "第二列" Then
    If e.Row.IsNull("第一列") = False Then
        If FileSys.FileExists(ProjectPath & e.Row("_Identify") & ".jpg") = False Then
            Network.DownloadFile(e.Row("第一列"), ProjectPath  & e.Row("_Identify") & ".jpg", "", "", False, 6000, True)
        End If
        e.StartDraw
        Dim img As Image = GetImage(ProjectPath  & e.Row("_Identify") & ".jpg")
        e.Graphics.DrawImage(img, e.x, e.y)
        e.EndDraw
    End If
End If
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110574 积分：562760 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/4/14 16:51:00 [只看该作者]

把窗口表改为sqlquery类型，就有窗口表事件了

如果还不行就到全局表事件处理：http://www.foxtable.com/webhelp/topics/0671.htm
 回到顶部
帅哥哟，离线，有人找我吗？
yetle
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：858 积分：6381 威望：0 精华：0 注册：2017/2/13 9:04:00 		  发帖心情 Post By：2021/4/14 17:28:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下：微信图片_20210414172744.png
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110574 积分：562760 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/4/14 17:29:00 [只看该作者]

代码不是随便找个事件就能用的

 回到顶部
帅哥哟，离线，有人找我吗？
yetle
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：858 积分：6381 威望：0 精华：0 注册：2017/2/13 9:04:00 		  发帖心情 Post By：2021/4/14 17:40:00 [只看该作者]

哦，应该放到DrawCell
但是放了之后，图片怎么没显示呢
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110574 积分：562760 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/4/14 17:45:00 [只看该作者]

没有图片，或路径不正确

 回到顶部
帅哥哟，离线，有人找我吗？
yetle
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：858 积分：6381 威望：0 精华：0 注册：2017/2/13 9:04:00 		  发帖心情 Post By：2021/4/14 17:51:00 [只看该作者]

PictureBox都有显示图片
Dim pbx1 As WinForm.PictureBox = Forms("商品销售").Controls("PictureBox1")
pbx1.ImageFile = Tables("商品销售_Table1").Rows(0)("图片地址")

Dim pbx2 As WinForm.PictureBox = Forms("商品销售").Controls("PictureBox2")
pbx2.ImageFile = Tables("商品销售_Table1").Rows(1)("图片地址")

图片点击可在新窗口打开查看此主题相关图片如下：微信图片_20210414174932.png
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110574 积分：562760 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/4/15 8:58:00 [只看该作者]

drawcell代码看看

 回到顶部
总数 24 1 2 3 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05762 秒, 4 次数据查询