CAD设计论坛

用户名  找回密码
 立即注册
论坛新手常用操作帮助系统等待验证的用户请看获取社区币方法的说明新注册会员必读(必修)
查看: 4657|回复: 3

[开发] .NET平台的AutoCAD二次开发

[复制链接]
发表于 2006-4-16 16:10 | 显示全部楼层 |阅读模式
华南理工大学 刘林 麦智晖 阎汉生
) R5 o0 |  O- D( D5 w4 Z
7 U6 `, K  X% x& D
5 n- r6 Q2 t4 s$ I, F6 @本文基于AutoCAD 2006新推出的.NET API为工具,介绍了在.NET平台下对AutoCAD进行二次开发的技术,并与目前常用的VBA、ObjectARX作了对比。同时讨论了如何弥补.NET API某些不足的功能。
) a* C4 a3 W: V9 c) i
: r$ [1 H. E! R  s) j  L4 }
  A. B; Q; J( V5 }当前AutoCAD的二次开发工具主要有:VisualLisp、VBA和ObjectARX等。其中,VisualLisp与VBA较为简单,特别是VBA,使用方便且开发速度较快,但其功能相比ObjectARX有所不足,尤其是对面向对象的功能支持不好。而ObjectARX基于VC平台,在C++的支持下,其功能非常强大,可以很好地运用各种面向对象技术,但其缺点是发开速度比较慢,同时对开发人员的能力要求较高。9 h! L; a) z/ w. O6 ~3 G. s4 h

. ?" f" B+ a0 D# [$ C. G1 N.NET是微软新推出的开发平台,具有众多优点。基于.NET平台对AutoCAD进行二次开发,可充分利用.NET的各种优势,在保证功能强大的前提下大大提高开发速度。3 x! c& ]( Z; o9 s+ }/ R: T

3 x. Q) I$ i; N2 W, a+ F一、基于.NET的开发7 {1 Z7 \3 Y* Q! T

& @2 ~+ R! ~& X1..NET API简介
: I  c) t- i8 `; y, Z; m0 l" a  V, o: O/ g& H' ~8 B
在新推出的AutoCAD 2006中,Autodesk为其开发增加了.NET API。.NET API提供了一系列托管的外包类(Managed Wrapper Class),使开发人员可在.NET框架下,使用任何支持.NET的语言,如VB.NET、C# 和Managed C++等对AutoCAD进行二次开发。其优点是完全面向对象,在拥有与C++相匹配的强大功能的同时,具有方便易用的特点,是较理想的AutoCAD二次开发工具。/ @+ Q! }  X, O3 o

; A2 a; P8 p9 O, v7 w0 Z2 L2..NET API与传统ObjectARX的主要区别, |/ J. r( P7 B) ~5 f

$ H/ q. Z- n2 x! E# p0 N& A' ?7 F) ~.NET API与传统ObjectARX的区别主要源于在.NET环境下开发应用程序与在VC环境下开发应用程序的区别。首先,在VC环境下,程序员需要自己管理内存的申请和释放,而.NET采用了垃圾回收机制,由.NET框架自行判断内存回收的时机并实行回收,从而解决了令C++程序员头痛的内存泄漏问题。也正是由于这个特点,在.NET环境下不能象在C++环境下那样利用析构函数释放其他的资源,需要程序员在程序中显式地释放。在.NET API中,主要通过Dispose来函数进行资源的释放。
. y/ k  c" r2 v( l
2 ~; ~2 n- W9 x4 o3 }" C0 s7 h5 m其次,ObjectARX中的各种反应器(Reactor)在.NET API中由外包类映射为各种事件(Event),可通过定义这些事件的响应函数来响应AutoCAD的各种操作。同时对于错误信息的处理也从函数返回值改变为通常异常来处理,使其更好地兼容.NET。由于VB.NET、C#等语言都是完全面向对象的,没有全局函数的概念,所以.NET API将ObjectARX下的全局函数封装为.NET API下的某些对象或对象的属性,如ObjectARX下与用户交互的系列全局函数被封装为CommandLinePrompt类。
, V; V6 t: x- Q- o) I, J! `. X) B: G" R) Q
3.使用.NET API
" z0 R% n# ], g+ k) }% S8 m* E7 V" }, z8 S5 ~& L: c
下面以C#为例,在Microsoft Visual C# 2005 Express Edition Beta平台上,先新建一个Class Library项目,再将AutoCAD2005安装目录下的acdbmgb.dll与acmgb.dll作为引用添加进项目中。这两个文件包含了.NET API中所有的外包类。, d2 u% `: ^4 |- G' f; i" R$ w

5 w- B0 N% n0 ?) b4 y; ~' h然后在要使用.NET API的类中添加以下语句以引用.NET API的命名空间。需要添加的语句如下:2 V# D6 k& }' k3 m$ a

' S( o% v# w/ Z. Susing Autodesk.AutoCAD.ApplicationServices;
. R2 l: }7 v& U- Rusing Autodesk.AutoCAD.DatabaseServices;1 }8 W. `# ]  U2 ~
using Autodesk.AutoCAD.Runtime;. n( Q& R2 f4 s1 N6 E! W  p9 E
using Autodesk.AutoCAD.Geometry;% K0 I9 p& P; b2 `3 x: e- }
! H' V$ e+ d# d1 S+ o9 w2 o
这样就可以利用.NET API进行开发了。以下代码可在AutoCAD注册为一个命令"AddLine",该命令可在当前工作空间中添加一条起点为(0,0,0),终点(200,200,0)的直线。代码如下:9 _9 x# O; @+ ]

" r* `( |! c  |6 S[CommandMethod ("AddLine")]) [: A" x. M. k4 r1 a0 `2 e
public static void AddLineCmd()
8 ]1 p' {4 ?4 h- {1 _9 y- @# F  Q{+ k- w$ M( d8 ]; t8 M4 E; a) V, [2 z
Database db = HostApplicationServices.WorkingDatabase;//获得当前工作空间的数据库
8 k& U- ?3 g$ j: |( LBlockTable bt = (BlockTable)db.BlockTableId.Open(OpenMode.ForRead); //获得块表/ U5 ~2 N( q4 d
BlockTableRecord btr = (BlockTableRecord)bt[BlockTableRecord.ModelSpace].Open(OpenMode.ForWrite); //获得模型空间的块表记录
1 |8 {" B( W+ T1 {1 b+ w0 \Line line = new Line(new Point3d(0, 0, 0), new Point3d(200, 200, 0));//创建一条直线% n- p7 q$ u; r) c$ `
try {
* p; U( ~; f" o: d; n7 hbtr.AppendEntity(line);//将直线添加到模型空间中
2 i9 b& e8 O+ D3 A  `" Vline.Close();//关闭该直线9 a/ O0 H" ]7 \8 h
}
7 Y* l, x6 l1 U) ufinally {
8 P3 t' l( a/ a# I/ \5 tbtr.Close();//关闭块表记录
# }- O+ j! Y8 L7 e$ zbt.Close();//关闭块表. j! w" z3 y' p( Z2 H) x) [/ J  j
}0 o5 E5 C! r1 [
}
* O+ d! A) `% }/ W1 Y$ c
/ {" @. G, ~+ |9 u* @由此可见,上述语句与在VC下的开发非常类似,其过程都是先得到数据库,然后依次打开块表、块表记录,接着添加实体,最后关闭块表、块表记录。值得注意的是finally语句,无论try块中的语句是否发生异常,finally块中的语句都会被执行,从而确保关闭块表和块表记录的操作会被执行。; T, L! ~/ j, }8 Z

' e4 M: Y# Y0 l9 B. d" l4 h写完代码后进行编译,编译完成将得到一个dll文件。在AutoCAD 2006中通过"netload"命令即可选择该dll文件进行加载,加载成功后即可以通过"AddLine"命令执行上述代码。遗憾的是目前的.NET API版本还不支持卸载,若要卸载只能关闭AutoCAD。- ~/ @  V0 z7 m
- D  t% ~1 _7 ~5 P
4..NET API的初始化与清除
" @/ f& z! K9 L0 J, s* Y$ M3 i9 Q) }, w% l; r9 F7 |
在ObjectARX中,"acrxEntryPoint"函数是ARX程序的载入点,程序的初始化和清除均可在该函数中进行。而在.NET API中则首先需要将初始化代码封装在一个类中,同时该类需要压迫实现
4 Q$ l/ w$ X9 p% D9 ~
& T+ V! g! D: n: d9 u1 B8 {) x( SIExtensionApplication接口。该接口包含Initialize与Terminate两个函数。其中Initialize负责加载程序时的初始化操作,Terminate则负责进行卸载程序时的清除操作。代码如下:8 t$ o  {, ?6 D+ y1 V' I8 }

# \+ |; X3 s! z% O8 gnamespace ARXExample {% _! y- C5 W: k; s& {9 \
public class MyARX : IExtensionApplication {. F% d2 w! h* N0 a2 W9 C
……9 S, O* y! `: B# r  f1 a: q
public void Initialize() {1 G3 q2 K& d: }
//初始化操作$ C+ A5 o, @5 i9 w$ V8 S
}+ R% j$ c$ S- F* _3 d7 _0 c
public void Terminate() {
0 s. S7 m7 J$ C3 w4 x//清除操作
) z. h5 H8 s3 d8 T% F1 m6 i& B}- `3 N4 y; {$ q+ I* b' o
……
1 f" Q, s5 t. X& {' s* M$ `) H- E' C2 r. I
}
! p7 k. I0 F- z2 j2 t7 H  m
, n2 Y3 t% Q$ z, W5 d/ }! S) f同时,为加快加载速度,可在MyARX.cs的文件头加入以下语句:" p" V8 w6 N  Y" p

; N9 H& M, V3 N, W[assembly: ExtensionApplication (typeof (ARXExample.MyARX) ) ]. u: s$ h  N: O5 C
[assembly: CommandClass (typeof (ARXExample.MyARX) ) ]
" X/ ]: Q1 F; |1 ^8 u8 v
4 y: r; A9 O. C1 }这样在加载程序时AutoCAD将直接通过MyARX中的Initialize语句进行初始化,同时注册MyARX中的命令。否则,AutoCAD将搜索dll中所有的类以找到实现IExtensionApplication接口的类进行初始化,如找不到则不进行初始化。同样,通过CommandClass属性,AutoCAD也会直接到MyARX类中搜索要注册的命令。当程序中包含的类数目较多时,通过ExtensionApplication和CommandClass这两个属性可显著地加快程序的加载速度。6 t0 m  g/ D& m! x( M& @
' y, |( d, I8 }, {/ T5 M' p
5..NET API与COM交互操作
! M& R% E  t! l# b
  Y9 r3 ]9 Y; b- B- k在目前的.NET API中,其功能与传统的ObjectARX相比有所不及,有相当的ObjectARX函数目前还没有封装到.NET API中,如GetPoint等。但可以通过COM方式使用ActiveX来弥补.NET API的不足。1 w  G% n  b& D+ G2 s7 \! K
) I4 F0 F: F2 D7 Y  ?  n
增加了COM引用后,程序就可以使用许多VBA中的功能了。以AutoCAD ActiveX中的事件为例,以下代码可以为当前工作空间中所有的图元添加Modified事件:
0 T, Y+ v4 h, s7 i# o* ]
( {  A8 W2 J% |. h8 ^Database db = HostApplicationServices.WorkingDatabase;
. b4 Y) d# s/ D2 ZBlockTable bt = (BlockTable)db.BlockTableId.Open(OpenMode.ForRead);
9 X/ W- [% ]0 g2 JBlockTableRecord btr = (BlockTableRecord)bt[BlockTableRecord.ModelSpace].Open(OpenMode.ForWrite);  }4 e. J$ g! B( j" b0 o  q
try {
- ?5 o- y! e* r5 L  ^* K% E: ^AcadObject obj;& H: [! u4 ]) ^, \. X
//遍历块表记录
4 y+ I8 n! `$ R6 ^foreach (ObjectId objId in btr) {
) K% T2 |: d0 k. x1 \% Q& t6 ]. ?//由ObjectId得到ActiveX中的AcadObject对象
% o; e4 [+ U' tobj = (AcadObject)((AcadDatabase)db.AcadDatabase).ObjectIdToObject(objId.OldId);! Y8 c% a! d  J
//为obj添加响应Modified事件/ ^! f$ \7 ?3 E
obj.Modified += new IAcadObjectEvents_ModifiedEventHandler(obj_Modified);4 E) n/ _: e% {2 F( Z
}: d* N0 C8 ^3 G. ]
}; I. ~. a9 O/ B6 |  g
finally {
: M, S& a: L( U1 A; @btr.Close();
- n/ C( Y- z5 T: Z/ qbt.Close();6 b" m# k" s. J0 ^( p! y) A( ?# v4 i
}
1 t' b- i) t, _7 C- _5 D4 y& u8 ~
. U1 f- a2 l6 }. S其中事件响应函数obj_Modified的表示如下所示:
2 m8 @4 a+ o- y' x, {# Y3 o
, K& ^8 V4 d. X7 A4 \( X4 Zpublic static void obj_Modified(AcadObject obj) {3 r; B5 \4 e) @8 p) u" Z! `
CommandLinePrompts.Message("object modified!" + obj.ObjectID + "\n");9 N) u( {0 w, D- O
}
% ?: s0 N4 b" q7 u( e
  e0 ^" i* X6 u! m* K二、结论
. C5 r' n+ |6 k0 G2 ?9 A4 L+ I4 |5 D/ [
本文以C#为例,对基于.NET API的AutoCAD二次开发作了较详细的介绍。.NET API在具有ObjectARX强大功能的同时具有VBA使用方便易用的优点,同时具有C++的强大功能,是较为理想的开发工具。但目前.NET API在某些方面还有些不足,但随着其版本的更新、完善,定会成为众多开发人员的首选工具。
发表于 2006-9-22 15:49 | 显示全部楼层

谢谢!

感谢高手的指导!1 Q+ B- k! o2 Q, U/ L
够我学一年半载的了!
发表于 2007-5-15 21:12 | 显示全部楼层
最好是先介绍一下啊,我是出学者,这方面不懂.希望那位能提供一些关于二次开发方面的书.
发表于 2007-12-30 13:52 | 显示全部楼层
学开发的话,上不是LISP和VBA什么的都要学呢,还是只选其一就可以了呢
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关于|免责|隐私|版权|广告|联系|手机版|CAD设计论坛

GMT+8, 2025-5-19 04:38

CAD设计论坛,为工程师增加动力。

© 2005-2025 askcad.com. All rights reserved.

快速回复 返回顶部 返回列表