怎么把外部参照合并到图纸_为什么在CAD图纸中插入外部参照后会出现多余图形?...

在使用浩辰CAD软件绘图的过程中,有些时候在CAD图纸中插入外部参照后图纸中就显示了一些不需要的图形;但是打开外部参照原图没有这些图形,插入到图纸后却显示出来了;这是什么原因呢?接下来以浩辰CAD软件给大家分析一下CAD图纸中插入外部参照后出现多余图形的原因及解决办法吧!

cd6fbc25bab74962c4803e424d87912f.png

225c281a1cdf9db419d45f58fb13ea3e.png

可以看到上面图纸中并没有这些紫色的云线,但在作为外部参照插入到当前图后,这些云线却显示出来了,这是什么原因呢?

580ea803bf21e7bfe8d8436c7a8cd5d4.png

外部参照插入到当前图后,我们可以通过关闭或冻结图层来控制参照图纸显示的内容,但通常情况下会先继承原图的图层状态,那为什么原图都看不到的图形当前图却会显示呢?

拿到图纸后我很快找到了原因,在外部参照的原图中的Defpoints图层被冻结了,而那些图形就是放在这个图层上的。

将此图层解冻,就可以看到这些图形了,如下图所示。

97bc46397f12eb9db3e7ed9ed0f7c8cf.png

既然在原图中此图层被冻结,为什么参照后此图层会被自动解冻呢?我们来看看原因,在插入参照的图纸中打开图层管理器,看看图层的状况,如下图所示。

e0447f59dd4f3bad53a53b715c89dc04.png

可以看到外部参照的图层名在图层列表中都显示为:参照图名|图层名,但我们在这个列表中并没有看到:参照图名|Defpoints,我们只能在列表中找到当前图的Defpoints图层,而此图层并未别冻结。

现在答案终于找到了:在插入外部参照时Defpoints图层会特殊处理,不会保留外部参照的此图层,而是会直接合并到当前图的Defpoints图层。

为什么这么处理呢?之前在介绍图层的时候讲过,Defpoints是创建标注的时候自动生成的图层,通常用于放置标注的定义点,这个图层默认是不打印的。既然这些图层的图形都不打印,在插入外部参照没有必再多生成一个图层了,因此浩辰CAD就将它们直接合并了。

但很多人为了省事,利用Defpoints图层不打印的特性,直接将一些不希望打印的图形放到此图层,比如说视口边界等等。他们拿到的参照底图中将一些云线的批注的图形直接放到了这个Defpoints图层,这些云线还被做到图块里,删除比较麻烦,于是就直接将此图层冻结了。但自己的图纸Defpoints图层并未关闭和冻结,当插入外部参照图纸插入以后,这些图形就重现显示出来了,那解决办法只能是:冻结自己图纸的Defpoints图层。

因此大家要记住:在插入外部参照的时候,外部参照的0层和Defpoints层会合并到当前图。如果需要提供其他人当底图,最好不要在0层和Defpoints图层上绘制图形,避免给别人带来不必要的麻烦。

以上就是使用浩辰CAD软件在CAD图纸中插入外部参照后出现多余图形的原因及解决办法,感兴趣的小伙伴可以看看哦~

CAD VBA(Visual Basic for Applications)是AutoCAD软件使用的一种编程技术,它允许用户自动化CAD操作,提高工作效率。在CAD插入外部参照是一个常见的操作,它允许用户将一个或多个图形文件(如DWG或DWF文件)链接到当前工作图纸,这样可以将其他图纸内容作为参考。以下是使用VBA插入外部参照的基本步骤: 1. 启动AutoCAD,打开你想要插入外部参照图纸。 2. 打开VBA编辑器(通常可以通过在AutoCAD命令行输入`VBAIDE`命令来打开)。 3. 在VBA编辑器创建一个新的宏或打开一个已有的宏,编写VBA代码来实现插入外部参照的功能。 下面是一个简单的VBA示例代码,用于在AutoCAD插入一个外部参照: ```vb Sub InsertXref() ' 定义变量 Dim acadApp As Object Dim acadDoc As Object Dim xrefName As String Dim insertPoint(0 To 2) As Double ' 设置外部参照文件名和插入点 xrefName = "C:\path\to\your\file.dwg" insertPoint(0) = 0 ' X坐标 insertPoint(1) = 0 ' Y坐标 insertPoint(2) = 0 ' Z坐标(对于2D图纸通常为0) ' 连接到AutoCAD应用程序 On Error Resume Next Set acadApp = GetObject(, "AutoCAD.Application") If acadApp Is Nothing Then MsgBox "无法连接到AutoCAD应用程序" Exit Sub End If On Error GoTo 0 ' 获取当前文档 Set acadDoc = acadApp.ActiveDocument ' 插入外部参照 acadDoc.InsertXref xrefName, insertPoint, False, False, False End Sub ``` 请注意,这段代码需要根据实际情况进行调整,包括文件路径、插入点等参数。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值