以文本方式查看主题

-  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() \'预览报表

请教一下,这段代码不能设置打印图片居中的吗?,打印纸张80*80
图片点击可在新窗口打开查看此主题相关图片如下:111.png
图片点击可在新窗口打开查看



--  作者:有点蓝
--  发布时间:2018/3/10 16:22:00
--  
参考:http://www.foxtable.com/help/scr/1182.htm