1 背景
近日,应朋友之托,看了看关于AutoCAD二次开发的事情。关于朋友的诉求,其实非常简单,就是在一个既定的DWG文件中,有一条折线和许多标注点。需要寻找在线上的标注点,并将其按照顺序输出到文件中。
如果上述工作采用人工选择的话,不仅费时费力,而且容易遗漏,因此自动化操作很有必要。所以就研究一下二次开发的事情。
AutoCAD(Auto Computer Aided Design)是美国Autodesk公司研制开发的一款计算机辅助设计软件,它不是一款简单的绘图工具,而是一个复杂的计算机辅助设计系统。我们可以根据他灵活的开放性对其进行二次开发定制,让它更加适用于某一具体的设计领域。
2 AutoCAD二次开发的常见方法
网上关于AutoCAD二次开发的方法有很多种,其中AutoCAD软件自带了Visiual Lisp编辑器,实现很方便,但是,对于新手而言,常用函数和语法不熟悉的情况,函数非常难于寻找(很可能是我不熟悉lisp语法吧)。比如:lisp获取所有对象的语句为
''''
(setq typ (cdr (assoc 0 (entget (ssname ss i)))))
''''
而visiual studio 有强大的提示功能,且函数命名比较直观。
PromptSelectionResult ssRes = ed.SelectAll(filter);
因此,对于c#熟悉的使用这个较好。
3 基于c#开发平台搭建
我是用的是AutoCAD2016简体中文版和Visiual Studio 2019(这个不一定要2019版)。根据网上搜索来的资料,首先测试自己搭建的环境是否有效。
在visiual studio 中新建一个类库项目,dotnet framework 版本设为4.5 ,这个和AutoCAD2016的类库是对应的。
进入所建好的类库项目后,主要做如下工作:
(1)添加对CAD类库的引用
在项目引用中利用右键添加引用,在AutoCAD程序安装目录找到accoremgd.dll,acdbmgd.dll和acmgd.dll三个动态链接库,添加后成功后,如下图所示:
(2)在类中新建如下测试函数
```C#
[CommandMethod("testdemo")]
public void testdemo()
{
Editor ed = Application.DocumentManager.MdiActiveDocument.Editor;
ed.WriteMessage("测试环境搭建");
}
```
依据错误内容提示,添加using语句:
```c#
using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.EditorInput;
using Autodesk.AutoCAD.Geometry;
using Autodesk.AutoCAD.Runtime;
```
(3)设置项目启动项
打开新建类库的属性页,在调试选项卡中,启动外部程序部分,选择autoCAD安装目录的主程序,这样在启动调试时,直接打开AutoCAD软件。
(4)启动调试后,程序自动打开AutoCAD软件,在CAD界面的命令窗口,输入netload,在弹出的窗口,选择上一步所构建的类库输出dll文件。然后,在命令输入框,输入testdemo命令,如果出现“测试环境搭建成功”,则表示环境搭建成功。
4 读取数据实现
在上一步搭建好环境的类库中,新建一个读取数据的函数。该函数主要逻辑为:
(1)获得用户选择的polyline对象
(2)获取用户要保存结果文件的名字
(3)获取文件所有待分拣的块对象
(4)判断块对象是否在线上,如果在,则计算该块对象到polyline起点的距离
(5)输出符合条件的块对象属性和距离到指定文件中
对于新手而言,主要的难点在于cad提供的哪些函数具备上述功能。这里将我找到的一些介绍如下,这里需要说明的是,对于cad二次开发,我也是新手,所选函数,仅仅是满足实现功能的目的,而不是最优的解决方案。
(1)和用户交互,获得用户所选的polyline对象:
Database db = HostApplicationServices.WorkingDatabase;
Document doc = Application.DocumentManager.MdiActiveDocument;
Editor ed = doc.Editor;
////制定用户选取一条线
PromptEntityResult res = ed.GetEntity("\n 请选择一条线: ");
if (res.Status != PromptStatus.OK) return;
(2)获取用户要输出的文件名字,这里没有用c#自带的对话框,而是借用cad的对话框:
//下面为对话框函数
PromptFileNameResult resFile = ed.GetFileNameForSave("结果保存");
if (resFile.Status==PromptStatus.OK)
{
string fileName = "";
fileName = resFile.StringResult;
}
(3)自动获取文件中所有块对象
PromptSelectionOptions selectionOp = new PromptSelectionOptions();
//创建选择集过滤器,只选择块对象
TypedValue[] filList = new TypedValue[1];
filList[0] = new TypedValue((int)DxfCode.Start, "INSERT");
SelectionFilter filter = new SelectionFilter(filList);
PromptSelectionResult ssRes = ed.SelectAll(filter);
(4)关于判定点在线上的有用函数
点到线最近距离点函数:GetClosestPointTo
某点到线起点距离计算:GetDistAtPoint,该函数的点必须在线上。我们找到的所有块对象,原则上是在线上的,但是实际测量中,可能存在偏差,所以就需要就近找到线上点。此外,所有的块对象并不是都属于改线,也可能有其他线的块对象,因此,需要计算改点和线上点位置,如果小于一定阈值,则可以认为改点是线上点,否则,属于其他对象。
Point3d pt3d2 = pPoly.GetClosestPointTo(pt3d, true);
double lengthToStartPoint = pPoly.GetDistAtPoint(pt3d2);
double range = Math.Sqrt((pt3d2.X - pt3d.X) * (pt3d2.X - pt3d.X) + (pt3d2.Y - pt3d.Y) * (pt3d2.Y - pt3d.Y));//计算待求点与线上点的距离
if (range<rangeCK)
{
Temprslt.Add(lengthToStartPoint, pt3d.Z);
}
(5)输出结果
输出结果用c#常用的的streamwriter函数即可。