cad.net开发

最近要做一个cad文件的7参数坐标转换的程序，想基于cad进行二次开发，初次学习。

为了方便快捷开发，基于cad.net进行二次开发，网上查了很多资料，有基于acad等各种，总是遇到这样那样的问题，经过自己研究，最终选择了直接开发命令的方式进行开发，但有时候还是用到acad相关函数，比如将Docmuent转换为AcadDocument进行相关操作等

（ Autodesk.AutoCAD.Interop.AcadDocument acadDoc = adoc.GetAcadDocument() as Autodesk.AutoCAD.Interop.AcadDocument;
acadDoc.SendCommand("zoom e\n");

）。

如果直接用document的SendStringToExecute执行cad命令，由于是异步的，需要等到动态库执行完成才执行命令，不满足我的要求，因此，转换为acad文档进行同步命令执行。

1、开发环境搭建

(1)vs版本：vs2015

(2)cad版本：cad2018

(3）cad.net开发包（2个，objectarx库和.net库）：Autodesk_ObjectARX_2018_Win_64_and_32_Bit.sfx.exe，AutoCAD_2018_dotnet_wizards。

开发包可以网上找，也可以官网下载，官网地址为：

https://www.autodesk.com/developer-network/platform-technologies/autocad。

官网.net下载如下图(objectarx貌似需要注册才能下载，我是网上下载的，由于网上找的.net库老是不行，所以通过官网下载）：

逐次安装以上软件，就可以进行开发了。

2、开发入门

安装完成后，打开vs，就可以新建cad.net的开发了。

在vs中新建项目，选择cad模板，如下图所示：

安装完cad.net才能在模板中选择autocad 2018 plugin in，.net框架选择4.6，完成后，就建立了一个cad插件程序。

新建完成后，主要有两个文件：

myCommands.cs写命令，myPlugin.cs设置插件相关信息。

（1）插件初始化（myPlugin.cs）

比如，我要在插件初始化时检查实际，并在完成后提示插件加载成功等消息，在myPlugin.cs的初始化函数void IExtensionApplication.Initialize()中添加如下代码：

Editor ed = Application.DocumentManager.MdiActiveDocument.Editor;
MyCommands.isLinced = checkTime(2020, 7, 7);
if (MyCommands.isLinced)
{
ed.WriteMessage("\n加载坐标转换成功！\n坐标转换命令：\n ZBSH\n\n\n");
load();
}
else
{
ed.WriteMessage("\n加载坐标转换失败！\n时间过期！！！！！！\n");
}

其中checkTime函数是我自己写的时间许可，检查完后根据需要提示相关信息。

void IExtensionApplication.Terminate()函数为插件退出执行的函数。

（2）命令编写（myCommands.cs）

在myCommands.cs中加入一个命令，比如新建dwg命令，

[CommandMethod("NewDwg", CommandFlags.Modal)]
public void NewDwg()
{
string tmppath = "acad.dwt";
DocumentCollection dcol = Application.DocumentManager;

Document adoc = dcol.Add(tmppath);
dcol.MdiActiveDocument = adoc;
}

这样在cad中输入“newdwg”命令即可实现新建dwg功能。

（3）执行命令

调试状态下直接F5运行程序（Debug模式），即可调试（通过cad模板新建的项目，已经将调试里面的启动外部程序设置为cad执行程序了，因此不需要自己设置）。

编译完成后，自动打开cad程序。

在cad中输入命令“netload”（每次启动都需要输入该命令，全局设置请百度），

选择生成目录下的dll文件，可显示信息，如下图所示：

然后输入“newdwg”命令，即可新建一个dwg文件。

部署时，通过release编译，加载方式也是一样，打开cad程序，先执行“netload”命令，加载dll文件，然后就可以输入相关命令了。

3、7参数坐标转换

我自己做了一个窗体，选择控制点进行坐标转换（具体转换程序百度）。

[CommandMethod("sh", "zbsh", "zbsh", CommandFlags.Modal | CommandFlags.UsePickSet)]
public void MyCommand() // This method can have any name
{
// Put your command code here
if (!checkLince())
{
return;
}
frmZBZH frm = new frmZBZH();
System.Windows.Forms.IWin32Window w = System.Windows.Forms.Form.FromHandle(Application.MainWindow.Handle);
frm.Show(w);
}

写转换代码就和.net写是一样的了。

private void transFromOneFile(string dwgFile, Transform7CSH tf, ref List<string> allNotSupported, bool onlyMove = false)
{
if (null == allNotSupported)
{
allNotSupported = new List<string>();
}
Autodesk.AutoCAD.ApplicationServices.DocumentCollection dcol = Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager;
Autodesk.AutoCAD.ApplicationServices.Document adoc = dcol.Open(dwgFile, false);
//dcol.MdiActiveDocument = adoc;
//dcol.MdiActiveDocument = adoc;
//dcol.MdiActiveDocument.LockDocument();
adoc.LockDocument();//必须锁定，否则 acTrans.GetObject利用OpenMode.ForWrite会出错
// adoc = dcol.MdiActiveDocument;
Database acCurDb = adoc.Database;
using (Transaction acTrans = acCurDb.TransactionManager.StartOpenCloseTransaction())
{
// Open the Block table for read
BlockTable acBlkTbl;
acBlkTbl = acTrans.GetObject(acCurDb.BlockTableId,
OpenMode.ForRead) as BlockTable;

// Open the Block table record Model space for write
BlockTableRecord acBlkTblRec;
acBlkTblRec = acTrans.GetObject(acBlkTbl[BlockTableRecord.ModelSpace],
OpenMode.ForWrite) as BlockTableRecord;
List<string> notSupported = new List<string>();
foreach (ObjectId asObjId in acBlkTblRec)
{
DBObject obj = acTrans.GetObject(asObjId, OpenMode.ForWrite);
bool ok = transformEntity(obj, acTrans, tf, onlyMove);
if (false == ok)
{
string strobj = obj.ToString();
if (false == notSupported.Contains(strobj))
{
notSupported.Add(strobj);
}
if (false == allNotSupported.Contains(strobj))
{
allNotSupported.Add(strobj);
}
}
}
if (notSupported.Count > 0)
{
txtmsg.AppendText(string.Format("文件\"{0}\"不支持的格式：\n", dwgFile));
txtmsg.AppendText(string.Join(";\n", notSupported));
txtmsg.AppendText("\n");
}
// Commit the changes and dispose of the transaction
acTrans.Commit();
}
// 缩放到视图，用这个才是同步执行
//Autodesk.AutoCAD.Interop.AcadApplication app = Autodesk.AutoCAD.ApplicationServices.Application.AcadApplication as Autodesk.AutoCAD.Interop.AcadApplication;
//app.ActiveDocument.SendCommand("zoom e\n");
Autodesk.AutoCAD.Interop.AcadDocument acadDoc = adoc.GetAcadDocument() as Autodesk.AutoCAD.Interop.AcadDocument;
acadDoc.SendCommand("zoom e\n");
// adoc.SendStringToExecute("\003\003zoom\ne\n", false, true, true);//异步执行，需要等到执行完后才执行该命令
// 关闭
if (chkCloseDealedFile.Checked)
{
//adoc.SendStringToExecute("e\n", false, true, true);
adoc.CloseAndSave(adoc.Database.Filename);
adoc.Dispose();
acCurDb.Dispose();
}
}