以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  预览图片怎么没有用  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=125705)

--  作者:hongyefor
--  发布时间:2018/10/4 13:13:00
--  预览图片怎么没有用

Dim doc As New PrintDoc \'定义一个报表对象
doc.PageSetting.PaperKind = 9 \'纸张类型改为A4
Dim rm As New prt.RenderImage \'定义一个图片对象
rm.Image = GetImage(ProjectPath & "\\RemoteFiles\\qyzl\\001(AOO1)
.jpg" ) \'设置图片
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() \'预览

[此贴子已经被作者于2018/10/4 13:41:20编辑过]

--  作者:有点甜
--  发布时间:2018/10/4 14:13:00
--  

代码没问题,注意路径是否写对,你去看看对应图片的路径是什么,贴出来看看。

 

rm.Image = GetImage(ProjectPath & "\\RemoteFiles\\qyzl\\001(AOO1).jpg" ) \'设置图片


--  作者:hongyefor
--  发布时间:2018/10/4 14:21:00
--  
001(AOO1).jpg,主要是这个问题,我把文件名里的括号改了后就没有问题了,但是源文件里就有()的,有什么办法
--  作者:有点甜
--  发布时间:2018/10/4 14:22:00
--  

半角、全角的问题?

 

http://www.foxtable.com/webhelp/scr/1273.htm

 


--  作者:hongyefor
--  发布时间:2018/10/4 14:26:00
--  
不是,主要是括号的问题,加上括号就不能预览图片了
--  作者:有点甜
--  发布时间:2018/10/4 14:27:00
--  
以下是引用hongyefor在2018/10/4 14:26:00的发言:
不是,主要是括号的问题,加上括号就不能预览图片了

 

你中文的括号和英文的括号是不同的,如 () 和 ()


--  作者:hongyefor
--  发布时间:2018/10/4 14:29:00
--  

对了,

半角、全角的问题