- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]我想问下如何给图片增加边框，并指定某个打印机打印？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=157703)
-- 发布时间：2020/10/26 13:36:00
-- [求助]我想问下如何给图片增加边框，并指定某个打印机打印？
此主题相关图片如下：1.png
我想给固定分辨率的图片，批量添加一些我自己做好的png相框素材，生成合成图后，并指定某个打印机进行打印。
请问有没什么思路？那些部分是Foxtable目前能解决，哪些需要我另外找第三方插件实现？
-- 发布时间：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
-- 发布时间：2020/10/26 15:03:00
--
妥了，完美，彻底解决需求
-- 发布时间：2020/11/17 15:49:00
--
怎么联系到你，我要找你定制个系统
-- 发布时间：2020/11/17 15:53:00
--
以下是引用曾先生在2020/11/17 15:49:00的发言：
怎么联系到你，我要找你定制个系统、
QQ 2385350359怎么联系到你，我要找你定制个系统、
你是不是想搞婚庆摄影呢？
-- 发布时间：2020/11/17 16:46:00
--
不是哦，我加你QQ了