以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]专业报表图片对齐问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=70012)
--  作者：pcxjxjhkw
--  发布时间：2015/6/14 18:42:00
--  [求助]专业报表图片对齐问题
Dim doc As New PrintDoc \'定义一个报表对象
Dim rm As New prt.RenderImage \'定义一个图片对象
rm.Image = GetImage("11.png") \'设置图片
rm.Style.ImageAlign.AlignHorz = prt.ImageAlignHorzEnum.Center \'居中显示
doc.Body.Children.Add(rm) \'将图片对象加入报表
Doc.Preview() \'预览

上述代码无法实现图片居中显示，不知是什么原因？
--  作者：大红袍
--  发布时间：2015/6/14 19:25:00
--  

Dim doc As New PrintDoc \'定义一个报表对象
Dim rm As New prt.RenderImage \'定义一个图片对象
rm.Image = GetImage("11.png") \'设置图片
rm.Width = "Parent.Width" \'宽度等于页面宽度
rm.Height = "Auto" \'高度由图片大小自动决定
rm.Style.ImageAlign.StretchHorz = False \'禁止图片水平拉伸
rm.Style.ImageAlign.AlignHorz = prt.ImageAlignHorzEnum.Center \'居中显示
doc.Body.Children.Add(rm) \'将图片对象加入报表
Doc.Preview() \'预览

 

http://www.foxtable.com/help/topics/1182.htm