Foxtable(狐表)用户栏目专家坐堂 → 报表插入图片无效


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

主题:报表插入图片无效

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


加好友 发短信
等级:六尾狐 帖子:1358 积分:11988 威望:0 精华:0 注册:2012/3/5 11:32:00
报表插入图片无效  发帖心情 Post By:2019/3/20 17:04:00 [只看该作者]


Dim doc As New PrintDoc '定义一个报表
Dim rt As New prt.RenderTable() 
doc.Body.Children.Add(rt) 

rt.Style.GridLines.All = New prt.LineDef 
rt.Width = "Parent.Width" '对象宽度等于页面宽度
rt.Height = 120  '对象高度等于页面高度
rt.Rows.Count = 2 '设置行数为2行
rt.Cols.Count = 2 '设置列数为2列

If FileSys.FileExists("C:\Users\pcliujianhua\Desktop\sdf.jpg") Then
            rt.Cells(1,0).Image = GetImage("C:\Users\pcliujianhua\Desktop\sdf.jpg")
Else
MessageBox.Show(1)      
End If

            rt.Cells(1,1).text  = "21321321"                         ’能输出
doc.Preview() 

指定路径不能输出,路径没有问题,请指点
[此贴子已经被作者于2019/3/20 17:07:21编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/3/20 17:18:00 [只看该作者]

 

我测试,只要图片路径正确,是正常的图片,都没问题。

 

请认真测试。


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


加好友 发短信
等级:六尾狐 帖子:1358 积分:11988 威望:0 精华:0 注册:2012/3/5 11:32:00
  发帖心情 Post By:2019/3/20 17:39:00 [只看该作者]


Dim doc As New PrintDoc '定义一个报表
doc.Body.Children.Add(rt) 

rt.Style.GridLines.All = New prt.LineDef
rt.Width = "Parent.Width" '对象宽度等于页面宽度
rt.Height = 120  '对象高度等于页面高度
rt.Rows.Count = 2 '设置行数为3行
rt.Cols.Count = 2 '设置列数为3列

If FileSys.FileExists("C:\Users\pc\Desktop\LCH03.png") Then
rt.Cells(0,0).Image = GetImage("C:\Users\pc\Desktop\LCH03.png")
End If
If FileSys.FileExists("C:\Users\pc\Desktop\LCH02.png") Then
rt.Cells(0,1).Image = GetImage("C:\Users\pc\Desktop\LCH02.png")
End If
If FileSys.FileExists("C:\Users\pc\Desktop\LCH05.png") Then
rt.Cells(1,0).Image = GetImage("C:\Users\pc\Desktop\LCH05.png")
End If
'---------------------------图片
rt.Cells(1,1).text  = "21321321"                         ’能输出
doc.Preview() 

甜版 我测试结果很奇怪   4个单元格 中 的3个放置图片进去  ,连续试几次,发现 只能随机输出 2个 或者 1 个  不能全部输出。 
是我电脑问题还是foxtable问题!


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/3/20 17:43:00 [只看该作者]

我测试代码没问题。请做一个对应实例发上来测试,图片也要发上来。

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


加好友 发短信
等级:六尾狐 帖子:1358 积分:11988 威望:0 精华:0 注册:2012/3/5 11:32:00
  发帖心情 Post By:2019/3/20 17:46:00 [只看该作者]

重新打开了就没问题了,比较奇怪!

 回到顶部