Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]专业报表，如何在一个表格单元格式里面同时设置图片对象和文本对象


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

主题：[求助]专业报表，如何在一个表格单元格式里面同时设置图片对象和文本对象
帅哥哟，离线，有人找我吗？
职业技术学校
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：186 积分：1819 威望：0 精华：0 注册：2019/5/13 12:37:00 		[求助]专业报表，如何在一个表格单元格式里面同时设置图片对象和文本对象  发帖心情 Post By：2021/6/7 22:57:00 [只看该作者]

[讨论]专业报表，如何在一个表格单元格式里面同时设置图片对象和文本对象

在专业报表的一个单元格里面如果我同时设置图片对象和文本对象，只会显示最后设置那个，不能同时设置
本意是一个单元格背景是一个图片，内容是一个文本？

Dim rm1 As New prt.RenderImage '定义一个图片对象
rm1.Image = GetImage("srk.png") '设置图片
rt.cells(rt.Rows.Count,2).RenderObject = rm1 

rt.Cells(rt.Rows.Count-1,2).SpanCols = 3
Dim rdt2 As New prt.RenderText 
rdt2.Text = "详细信息显示" '设置文本对象的内容
rdt2.Style.TextAlignHorz = prt.AlignHorzEnum.Center '水平居中
rdt2.Style.TextAlignVert = prt.AlignHorzEnum.Center '水平居中
rdt2.Style.Font = New Font("楷体", 16, FontStyle.Bold) '设置字体
rt.cells(rt.Rows.Count-1,2).RenderObject = rdt2
 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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


也可以：http://www.foxtable.com/webhelp/topics/1185.htm
[此贴子已经被作者于2021/6/7 23:03:18编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
职业技术学校
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：186 积分：1819 威望：0 精华：0 注册：2019/5/13 12:37:00 		  发帖心情 Post By：2021/6/7 23:14:00 [只看该作者]

这样也不能设置成图片在下层，文字在上层的效果

 回到顶部
帅哥哟，离线，有人找我吗？
职业技术学校
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：186 积分：1819 威望：0 精华：0 注册：2019/5/13 12:37:00 		  发帖心情 Post By：2021/6/7 23:17:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下：图片和文字.png
图片点击可在新窗口打开查看

这种效果
 回到顶部
帅哥，在线噢！
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

只能说没有认真看帮助
……
For i As Integer = 0 To 3
    ra = rt.Cells(i,0).Area '引用单元格的容器
    rm = New prt.RenderImage '创建一个图片
    rx = New prt.RenderText '创建一个文本
    ra.Stacking = prt.StackingRulesEnum.BlockTopToBottom 
    '设置图片对象
    rm.Image = GetImage("001.ico")
    rm.Style.Spacing.Right = 2 '距离右边的对象2毫米
    '设置文本对象
    rx.Text = "加拿大"
    'rx.Height = "Prev.Height" 'rx的高度等于图片对象rm的高度
    rx.Style.TextAlignVert = prt.AlignVertEnum.Center '文本垂直居中
    '设置RenderArea,并将文本和图片加入到RenderArea
'
    ra.Children.Add(rx) '加入文本到RenderArea中
    ra.Children.Add(rm) '加入图片到RenderArea中
Next
……
 回到顶部
帅哥哟，离线，有人找我吗？
职业技术学校
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：186 积分：1819 威望：0 精华：0 注册：2019/5/13 12:37:00 		  发帖心情 Post By：2021/6/15 16:08:00 [只看该作者]

你没理解我要的效果

图片点击可在新窗口打开查看此主题相关图片如下：图片.png
图片点击可在新窗口打开查看

如图：下面黄色的是一张图片，图片上门层叠的是文字，文字在图片上，所谓是上不是上下位置的上，是层叠的上层
 回到顶部
帅哥，在线噢！
有点蓝
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

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

先绘制图片，再绘制文字，然后添加到ra里
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05469 秒, 4 次数据查询