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


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

主题:窗口表单元格内显示图片

帅哥哟,离线,有人找我吗?
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 下一页