天天看点

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库老是不行,所以通过官网下载):

cad.net开发

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

2、开发入门

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

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

cad.net开发

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

新建完成后,主要有两个文件:

cad.net开发

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文件,可显示信息,如下图所示:

cad.net开发
cad.net开发

然后输入“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();

            }

        }

其中transformEntity()函数,实现实体的坐标转换。

Transform7CSH类是我写的7参数转换的类。

运行界面如下图所示:

cad.net开发

继续阅读