VBA:如何插入光栅图像并隐藏边框？

157787698 · 发表于 2011-7-1 11:07:48

马上注册，结识高手，享用更多资源，轻松玩转三维网社区。

您需要登录才可以下载或查看，没有帐号？注册

x

两个问题：
1、VBA如何在图纸中直接插入光栅图像？
我现在的方法是曲线救国，因为我要插入到每一幅图中的内容是固定的，即公司LOGO，所以我先将图片插入到图纸中并保存，然后每次需要使用的时候，使用Attchexternalreference方法插入事先做好的dwg格式图纸

2、VBA如何将插入图纸中的光栅图像边框去掉？
这个问题目前没有找到解决办法，只能手动通过菜单修改：修改-对象-图像-边框-0；或者通过或Imagehlt命令修改

请高手指点，先谢谢了

woaishuijia · 发表于 2011-7-1 12:54:25

1、VBA如何在图纸中直接插入光栅图像？

ModelSpace 集合, PaperSpace 集合和 Block 对象的 AddRaster 方法

2、VBA如何将插入图纸中的光栅图像边框去掉？

是否显示或打印光栅图像的边框取决于 IMAGEFRAME 系统变量的值
设置系统变量使用 Document 对象的 SetVariable 方法

157787698 · 发表于 2011-7-1 16:14:11

本帖最后由 157787698 于 2011-7-1 16:18 编辑

IMAGEFRAME 系统变量好像只出现在2010中，06/08中都没有

在06/08中IMAGEFRAME是命令

还有没办法解决？

157787698 · 发表于 2011-7-1 16:30:53

ThisDrawing.SendCommand "_imageframe" & vbCr & "0" & vbCr
实现了

		自动登录	找回密码
密码			注册

全站		goto3d 说: 此次SW竞赛获奖名单公布如下，抱歉晚了，版主最近太忙：一等奖：塔山817；二等奖：a9041、飞鱼；三等奖：wx_dfA5IKla、xwj960414、bzlgl、hklecon；请以上各位和版主联系，领取奖金！！！	2022-03-11
系统		[系统通知] 平台第一个项目外包——项目拼多；正式上线，欢迎各单位个人有外包、设计、采购、加工需求的，在此寻找更牛的解决方案	2021-07-01

通知

[已答复] VBA:如何插入光栅图像并隐藏边框？

马上注册，结识高手，享用更多资源，轻松玩转三维网社区。