以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  报表图片问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=194347)

--  作者:191422411
--  发布时间:2024/12/1 20:40:00
--  报表图片问题
Dim rm As New prt.RenderImage \' 添加鉴定人签名   
rm.Image = GetImage("mysys\\" & yuren(ip) & ".png")

rm.Width = w

rm.Height = "Auto" \'高度由图片大小自动决定
rm.Style.ImageAlign.StretchHorz = False \'禁止图片水平拉伸
rm.X = l + (w + m) * ip + Rand.Next( r * ( - 1) , r)
rm.Y = t + Rand.Next( r * ( - 1) , r)


上述第三行变量控制的图片宽度为什么不是缩放,而是直接裁剪切掉?


--  作者:有点蓝
--  发布时间:2024/12/1 20:54:00
--  
自己禁止了哦,去掉下面代码

rm.Style.ImageAlign.StretchHorz = False \'禁止图片水平拉伸