标题：报表中的图片如何根据容器对象大小缩放呢

1楼

饭浇盖 发表于：2024/5/27 12:46:00

Dim rm As New prt.RenderImage() '定义一个图片对象

rm.Width = 100

rm.Height=30

rm.Image = GetImage("logo.png") '请改为实际的图标名称和路径

rm.Style.ImageAlign.AlignHorz = prt.ImageAlignHorzEnum.Center '图片水平居中

rm.Style.ImageAlign.AlignVert = prt.ImageAlignVertEnum.Center '图片垂直居中

rm.Style.ImageAlign.StretchHorz = True '禁止水平方向扩展图片

rm.Style.ImageAlign.StretchVert = True '禁止垂直方向扩展图片

这里图片过大，超出了对象

2楼

cd_tdh 发表于：2024/5/27 12:55:00

这个？

http://www.foxtable.com/webhelp/topics/1845.htm

3楼

有点蓝 发表于：2024/5/27 13:33:00

rm.Width = "Parent.Width" '宽度等于页面宽度
rm.Height = "Auto" '高度由图片大小自动决定
rm.Style.ImageAlign.StretchHorz = False '禁止图片水平拉伸
rm.Style.ImageAlign.AlignHorz = prt.ImageAlignHorzEnum.Center '居中显示

共3 条记录, 每页显示 10 条, 页签: [1]