- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 专业报表如何实现单元格缩小字体填充 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=47095)
-- 发布时间：2014/3/4 14:30:00
-- 专业报表如何实现单元格缩小字体填充
类似excel这样：
此主题相关图片如下：tofit.bmp
请问在专业报表中有什么属性控制单元格达到此效果吗？
在命令窗口示例如下：
Dim doc As New PrintDoc \'定义一个报表
Dim rt As New prt.RenderTable() \'定义一个表格对象
doc.Body.Children.Add(rt) \'将表格对象加入到报表中
rt.Style.GridLines.All = New prt.Linedef \'设置网格线
\'下面的代码向表格中填入值
For r As Integer = 0 To 5
For c As Integer = 0 To 5
Dim rx As New prt.RenderText \'定义一个文本对象
rx.Text = r & "aaaaaaaaaaaaaaa" & c \'为文本对象设置内容
rt.Cells(r, c).RenderObject = rx \'将文本对象放置在单元格中
Next
Next
doc.Preview() \'预览报表
预览结果显示，单元格内容自动换行显示，如何能达到类似excel的效果呢？
[此贴子已经被作者于2014-3-4 14:32:09编辑过]
-- 发布时间：2014/3/4 14:32:00
--
http://www.foxtable.com/help/topics/1168.htm
-- 发布时间：2014/3/4 14:40:00
--
以下是引用Bin在2014-3-4 14:32:00的发言：
http://www.foxtable.com/help/topics/1168.htm
此帮助不能解决我的问题呀，http://www.foxtable.com/help/topics/1168.htm
ft的自带打印预览也有此问题。
[此贴子已经被作者于2014-3-4 14:41:02编辑过]
-- 发布时间：2014/3/4 14:41:00
--
请先认真查看,这个就是专业报表的样式设置和字体设置.
-- 发布时间：2014/3/4 14:49:00
--
唉，有类似ShrinkToFit属性吗？版主！
你还没搞明白我的意思呢，我不想去自己写代码判断内容大小，如果没有自动调整的属性，就只能自己判断，然后缩放字体！
-------------------------------
查询了c1preview，未找到类似属性。
自己解决！
[此贴子已经被作者于2014-3-4 16:05:54编辑过]