以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 如何设置打印图片居中 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=115627) |
-- 作者:llh0824 -- 发布时间:2018/3/10 16:07:00 -- 如何设置打印图片居中 Dim doc As New PrintDoc \'定义一个报表 doc.PageSetting.Width = 80 \'纸张宽度为80毫米 doc.PageSetting.Height = 80 \'纸张高度为80毫米 Dim rm As New prt.RenderImage() \'定义一个图片对象 rm.Image = GetImage("c:/ewm/"1.jpg") \'请改为实际的图标名称和路径 rm.Style.ImageAlign.AlignHorz = prt.ImageAlignHorzEnum.Center \'图片水平居中 rm.Style.ImageAlign.AlignVert = prt.ImageAlignVertEnum.Center \'图片垂直居中 rm.Style.ImageAlign.StretchHorz = False \'禁止水平方向扩展图片 rm.Style.ImageAlign.StretchVert = False \'禁止垂直方向扩展图片 doc.Body.Children.Add(rm) \'将表格对象加入到报表中 Doc.Preview() \'预览报表 |
-- 作者:有点蓝 -- 发布时间:2018/3/10 16:22:00 -- 参考:http://www.foxtable.com/help/scr/1182.htm |