Foxtable(狐表)用户栏目专家坐堂 → 专业报表中的源图片大小不同时,如何在产生报表后显示相同大小?


  共有1147人关注过本帖树形打印复制链接

主题:专业报表中的源图片大小不同时,如何在产生报表后显示相同大小?

帅哥哟,离线,有人找我吗?
户国兴
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:143 积分:1728 威望:0 精华:0 注册:2020/8/15 9:21:00
专业报表中的源图片大小不同时,如何在产生报表后显示相同大小?  发帖心情 Post By:2023/9/25 9:11:00 [只看该作者]

图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
cd_tdh
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3082 积分:20596 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2023/9/25 9:18:00 [只看该作者]

我个人觉得先处理好图片,如果直接拉伸图片会变形肯定不好看。

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106688 积分:542629 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/9/25 9:25:00 [只看该作者]

强制把图片拉伸?这样图片内容会变形。

可以按指定的分辨率修改图片大小

Dim bmpDest As New Bitmap(200, 200)
Dim bmpSrc As New Bitmap("D:\问题\1.png")
Dim g = Graphics.FromImage(bmpDest)
Dim rectDest As New System.Drawing.Rectangle(0, 0, 200, 200)
Dim rectSrc As New System.Drawing.Rectangle(0, 0, bmpSrc.Width, bmpSrc.Height)
g.DrawImage(bmpSrc, rectDest, rectSrc, GraphicsUnit.Pixel)
g.Dispose()
bmpDest.Save("D:\问题\2.png", bmpSrc.RawFormat)

 回到顶部
帅哥哟,离线,有人找我吗?
户国兴
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:143 积分:1728 威望:0 精华:0 注册:2020/8/15 9:21:00
  发帖心情 Post By:2023/9/25 9:38:00 [只看该作者]

收到,谢谢!


 回到顶部