Foxtable(狐表)用户栏目专家坐堂 → [求助]我想问下如何给图片增加边框,并指定某个打印机打印?


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

主题:[求助]我想问下如何给图片增加边框,并指定某个打印机打印?

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/10/26 13:48:00 [显示全部帖子]

合并图片

Dim imgback As image = getimage("d:\a.png")   '主图
Dim bmp As new bitmap(imgback.width, imgback.height)
Dim g As System.Drawing.Graphics  = System.Drawing.Graphics.FromImage(bmp)
g.DrawImage(imgback, 0, 0, imgback.Width, imgback.Height) '绘制主图'
Dim img = GetImage("d:\b.png")    '获取副图片
Dim x As Integer = imgback.Width - 120 '副图距离主图左边距
Dim y As Integer = imgback.height - 120 '副图距离主图上边距
g.DrawImage(img, x, y, 100, 100)     '绘制第二张图片
bmp.Save("d:\c.jpg") '保存
bmp.dispose '释放资源'

把图片放到专业报表里打印:http://www.foxtable.com/webhelp/topics/1588.htm

 回到顶部