CAD中插入外部参照字体会变繁体_为什么CAD插入相同图框但尺寸却相差很多?

c716913a2eeaf9e8f30127e1de9fd493.gif

下面是本公众号文章分类目录,点击标题文字可打开分类文章列表:

CAD安装卸载  异常、退出  文件及输入输出  基本操作技巧  各种设置及相关问题  界面和显示相关问题  快捷键  视图设置和调整  选择及组  坐标系、坐标输入  对象捕捉  图层管理   颜色  线型  字体和文字  标注、引线  二维绘图  多段线   表格   图块、属性块、动态块  填充   复制粘贴  三维建模  图形编辑修改  布局和视口  外部参照  光栅图像  打印输出  查询面积等数据  心得及综合技巧  CAD工具及插件  CAD图库及相关资源   二维练习图  三维练习图 CAD基础练习图(1-30) CAD基础练习图(31-64) CAD基础练习图(65-100)

网友在群里问一个像绕口令一样的问题:两副图纸布局中的图框和视口比例相同怎么显示大小却不一样啊?开始我也很疑惑,没明白是什么意思,只要视口比例相同,里面显示的图形大小就应该是相同的啊!

等看完他过来来的图纸终于明白什么情况了,他在模型空间画完图,在布局空间插入了一个A2的图框,然后在图框内创建了一个视口,并将比例设置成了1:100,设置完本来应该显示建筑平面图的局部,但整个视口却连一个门都没显示全,如下图所示。

89aace6d4dcbc678e5327b67b58a442c.png

由于他只把注意力放在了图框和视口比例上,认为图框是直接按照1:1插入的,应该没有问题,其实检查一下图框的尺寸就会发现问题了,测量一下图框的尺寸会发现并不是标准的A2图框的尺寸,如下图所示。

8b150033985c8d0fe7737d7621e62ad1.png

为什么会这样呢?选中图框,打开特性面板(CTRL+1),可以看到这个图框虽然各轴向的比例都是1,但下面还有一个单位因子是0.0394。

2be90c5094455012c2354f91565a9107.png

这个才是问题的根源!

问题原因:

图框和当前图纸的单位不一致!

图框是一个块文件,文件插入时的缩放单位是毫米,而这张图纸的单位设置则是英寸,如下图所示。

fb20511bcdb7e2590f327155ba323a3d.png

在将图框文件插入到当前图的时候,虽然比例设置是1,但会根据单位不同进行转换,也就是要将毫米转换成英寸,因此图框的尺寸值变小了25.4倍,如下图所示。

e56bc989f66ffddab6df5616a157041c.png

图框按照英寸计算还是A2的尺寸,而但绘制的时候是按照毫米输入的,单位设置成英寸等于放大了25.4倍,自然里面放的图形就少了。

解决办法:

修改单位设置!

网友的问题显然是当前图纸的单位设置错了,只需要将当前图的单位设置成毫米,然后重新再插入图框,图框的尺寸就会正常了,如下图所示。

51c090ec91f78d13baa2a1f656f350b7.png

之前的文章中介绍过单位的作用,也讲过插入外部参照时尺寸不匹配的问题,但发现遇到这个问题的人还是挺多的。

每日一贴——CAD的单位设置相关问题和功能每日一贴——CAD的单位设置相关问题和功能

为什么CAD外部参照插入后图形不匹配?

这里再强调一遍:

CAD的单位设置对单张图纸没有什么影响,这个单位叫“插入时的缩放单位”,当插入图块文件或外部参照时这个单位就会起作用,所以图纸的单位要统一或匹配。

在画图的时候必须规范,不要随意去修改一些设置,这些设置可能在当时看不出影响,但后面可能会给我们带来困扰。

af5a5113149a7ada4ae389b42976ee84.png长按识别二维码 关注本公众号

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、付费专栏及课程。

余额充值