以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  将2张图片怎么合成一张  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=128486)

--  作者:mmd888
--  发布时间:2018/12/8 0:29:00
--  将2张图片怎么合成一张
图片点击可在新窗口打开查看

类似上面这样的图片 怎么生成呢,我怎么能将动态生成的二维码 以及文字信息,与背景图片合成一张图片呢?


--  作者:有点蓝
--  发布时间:2018/12/8 9:07:00
--  
Dim bmp = getimage("f:\\1122.jpg")  \'1122.jpg为背景图片
Dim g = Graphics.FromImage(bmp)
g.DrawImage(getImage("F:\\333.jpg"),100,100) \'在背景离顶部100像素,左边100像素的地方开始绘制第二张图
bmp.Save("f:\\555.jpg")
bmp.Dispose()

--  作者:mmd888
--  发布时间:2018/12/8 11:59:00
--  
谢谢老师,这个方法好使