autocad中快速改变图线宽度的方法.doc

AutoCAD中图元实体宽度的更改 2006-04-06 18:06 星期四 庞永　　[摘要] 本文通过分析AutoCAD图元实体的实体组代码，提出了通过分离组代码而提取所需信息，随后对数据进行更改和对图形进行更新的基本原理；并据此提出了将此原理应用于AutoCAD图形线宽修改工作中的具体实现方法。　　关键词 AutoCAD 图元 实体组代码　　　　 一. 序 言　　　　 使用CAD系统绘制的工程图，实际上是用线框造型方法构造的两维数学模型。对于一般的工程图而言，用直线、圆、圆弧等有限的几个图元实体即可绘出整个图形。在绝大多数CAD系统中，这些图元实体的“线宽”都是0。当通过绘图仪出图时，CAD系统中的绘图仪驱动程序可以让用户指定各类实体的“线宽”，随后绘图仪就可以按用户指定的线宽将实体在图纸上绘制出来，因此图纸上就会有粗线、细线之分；线宽就不再完全相同了。　　AutoCAD R13 for Windows具有强大的图形绘制和编辑能力，早已广泛地应用于机械、建筑等领域的工程制图工作中。利用Windows的OLE特性，我们可以把AutoCAD中绘制的图纸嵌入到Microsoft Office、Foxpro等程序中去，从而可以写出图文并茂的产品设计文件。　　 但象其他CAD系统一样，在AutoCAD中我们绘出的图形一般都是0宽度的图元实体，当把这样的图形嵌入到Microsoft Office程序（其他程序原理相同）中后，因Microsoft Office与AutoCAD的绘图仪驱动程序毫无关系，所以在Microsoft Office这类程序中打印出来的图形便不再有粗、细线之分；因此，这样的文档满足不了我们的要求。　　显然，在这种情况下，一个最简捷的处理方法是：我们先在AutoCAD（其他CAD系统类似）中将所有0线宽的图元实体变成有指定宽度的图元实体，然后再通过OLE将它嵌入到Microsoft Office或其他Windows应用程序中去。本文将对这种方法的实现方式进行讨论。　　　　 二. 基 本 原 理　　　　AutoCAD中图元实体（Entity）的种类很多，但工程制图中常用的图元实体主要有直线（Line）、圆（Circle）、圆弧（Arc）、多义线（Polyline）、文本（Text）、面包圈（Donut）、组（Group）、块（Block）、外部引用（Xref）等几种。组、块、外部引用可以分解成组成它们的基本图元；因此，可能需要改变宽度的图元实体主要有直线、圆、圆弧、多义线、面包圈这五种（其他图元处理方式类似）。由于一般在绘图时，用户都把在图纸上具有同一宽度的图元绘在同一层上；因此，更改图元线宽的工作可以分成如下几步来做：　　1. 将需要改变线宽的图元层的层名放在一个变量，例如lname中；过滤出此层上的所有实体，由这些实体构成一个选择集sset_1。本过程可用Lisp机制表达如下：　　 (setq sset_1 (ssget “X” (list (cons 8 lname))))　　2. 从选择集sset_1中分别提取每一实体的实体组代码，从实体组代码中找到各实体的实体类型：　　 (setq s1 (ssname sset_1 count))　　 (setq et (entget s1))　　 (setq name (cdr (assoc 0 et)))　　 其中count为实体在选择集中的序号。　　3. 根据各实体的实体类型，按以下方法进行相应的处理：　　 (1).对于直线和圆弧，可将其转换成多义线，然后再赋以一定的线宽。　　 (2).对于圆，先提取出其圆心和半径：　　 (setq cen (cdr (assoc 10 et)))　　 (setq r (cdr (assoc 40 et)))　　然后将圆删除，在圆心处按圆的半径和给定的线宽重新生成一个面包圈。　　(3).对于多义线，则可直接修改其线宽。　　(4).对于面包圈，AutoCAD实际上将其视为多义线，因此不需要另作考虑。　　(5).对于样条曲线（spline），可在Autodesk Mechanical Desktop中执行AMUNSPLINE命令，将其转换成多义线，然后再按多义线进行处理。　　(6).对于椭圆，可在Autodesk Mechanical Desktop中用AMFITSPLINE命令将其转换成样条曲线，然后再按样条曲线进行处理。　　　　 三. AutoCAD的实体组代码　　　　按前述方法，即可方便地完成图元实体线宽的转换。但在前面的论述中，我们没有谈到AutoCAD的实体组代码。实际上，在AutoCAD中，图形上的每一个实体都有一个特定的实体组代码，其中包含有此实体的实体名