1.Autodesk官方新的.net教程（一）（C#版）：

(1)启用对象浏览器方法：

双击托管的类，会自动调用对象浏览器

（2）调试环境设置：

应设2项，否则调试程序无法运行：

启动外部程序为:F:/AutoCAD2007/acad.exe

工作目录为：F:/AutoCAD2007/UserDataCache/

2.Autodesk官方新的.net教程（二）（C#版）：

（1）prPointRes=ed.GetPoint(prPointOptions);前面应加入下列语句：

Editored=Application.DocumentManager.MdiActiveDocument.Editor;

(2).NETAutoCAD向导生成的项目中调试项目中只加入了外部程序，没有加入工作目录，需手工加入。

(3)加入第2个cad命令的方法：将上一个命令原版拷贝过来，直接修改就可以了。

3.Autodesk官方新的.net教程（三）（C#版）：

原文中部分变量与类型中没有空格。

Chapter 1HelloWorld:访问ObjectARX.NET封装类

在这一章中，我们将使用VisualStudio.NET来创建一个新的类库工程。通过这个工程，你可以创建一个能被AutoCAD装载的.NET?dll文件。这个dll文件会向AutoCAD加入一个名为“HelloWorld”的新命令。当用户运行这个命令后，在AutoCAD命令行上将显示“HelloWorld”文本。

1)启动VisualStudio.NET，选择”文件>新建>工程”(File>New>Project)。在新建工程对话框中选择工程类型为”VisualC#工程”，然后选择”类库”模板，在工程名字框中输入”Lab1”，然后选择工程存放的位置。点击确定按钮来创建工程。

2)在工程的Class1.cs文件中，一个公有类“Class1”已经被系统自动创建了。接下来向这个类加入命令。要加入命令，你需要使用AutoCAD.NET托管封装类。这些托管封装类包含在两个托管模块中。要加入对这两个托管模块的引用，请用鼠标右键单击”引用”然后选择”添加引用”。在弹出的”添加引用”对话框中选择”浏览”。在”选择组件”对话框中，选择AutoCAD2006的安装目录（这里假定为C:/ProgramFiles/AutoCAD2006/），在这个目录下找到“acdbmgd.dll”然后选择并打开它。再一次选择”浏览”，在AutoCAD2006的安装目录下找到“acmgd.dll”并打开它。当这两个组件被加入后，请单击”添加引用”对话框中的”确定”按钮。正如它们的名字所表示的，acdbmgd.dll包含ObjectDBX托管类，而acmgd.dll包含AutoCAD托管类。

3)使用对象浏览器（VisualStudio.NET的”查看>其它窗口>对象浏览器”菜单项）来浏览加入的两个托管模块所提供的类。请展开“AutoCAD.NETManagedWrapper”对象（在对象浏览器中显示为acmgd），在整个教程中我们将使用这个对象中的类。在本章中，我们将使用“Autodesk.AutoCAD.EditorInput.Editor”类的一个实例来在AutoCAD命令行中显示文本。请再展开“ObjectDBX.NETManagedWrapper”?对象（在对象浏览器中显示为acdbmgd），这个对象中的类将被用来访问和编辑AutoCAD图形中的实体（这部分内容将在以后的章节中介绍）。

4)引用了ObjectARX.NET封装类后，我们就可以导入它们。在Class1类的声明语句（位于Class1.cs文件的顶部的）之前，导入ApplicationServices,EditorInput和Runtime命名空间。

usingAutodesk.AutoCAD.ApplicationServices;

usingAutodesk.AutoCAD.Runtime;

5)接下来在类Class1中加入命令。要加入能在AutoCAD中调用的命令，你需要使用“CommandMethod”属性。这个属性由Runtime命名空间提供。在类Class1中加入下列属性和函数。

[CommandMethod("HelloWorld")]

public?voidHelloWorld()

{

}

6)当“HelloWorld”命令在AutoCAD中运行的时候，上面定义的HelloWorld函数就会被调用。在这个函数中，一个Editor类的实例将被创建。Editor类拥有访问AutoCAD命令行的相关方法，它还包括选择对象和其它一些重要的功能。AutoCAD当前活动文档的Editor对象可以使用Application类来访问。当Editor对象被创建后，你可以使用它的WriteMessage方法在命令行中显示“HelloWorld”文本。在HelloWorld函数中加入以下代码：

Editored=Application.DocumentManager.MdiActiveDocument.Editor;

7)要在AutoCAD中调试这个程序，你可以让VisualStudio.NET启动一个AutoCAD进程。在解决方案管理器中右键单击“Lab1”，然后选择”属性”。在Lab1的属性页对话框中，选择”配置属性>调试”。在”启动”项中，选择”调试模式”为”程序”，在”启动程序”的右边单击省略号按钮然后选择AutoCAD2006安装目录下的acad.exe。设置好以后，按F5来启动一个AutoCAD进程。这样就会编译你的程序然后自动启动AutoCAD，而当编译后有错误的时候就会停止。请修正你可能碰到的任何错误。

8)“NETLOAD”命令被用来装载托管程序。在AutoCAD命令行中输入NETLOAD，会出现”选择.NET组件”的对话框。选择上面生成的“lab1.dll”然后打开它。

9)在命令行中输入“HellowWorld”。如果一切顺利的话，命令行中将显示“HelloWorld”文本。切换到VisualStudio.NET，在ed.WriteMessage(“HelloWorld”);语句处加入一个断点。在AutoCAD中再次运行HelloWorld命令，你会注意到你可以跟踪代码的运行。VisulStudio.NET的”调试”菜单有好几项可以用来跟踪程序的运行。

Chapter 2.NETAutoCAD向导及Editor类

在Chapter 1中，我们使用的是类库模板，这样就不得不手工加入acdbmdg.dll和acmgd.dll这两个引用。在这一章中，我们将使用AutoCAD托管C#应用程序向导来创建.NET工程，它会自动加入以上两个引用。在开始本章之前，你首先得安装ObjectARX向导(ObjectARX2006开发包的/utils/ObjARXWiz/ArxWizards.msi)。

1)启动VisualStudio.NET，选择”文件>新建>工程”(File>New>Project)。在新建工程对话框中选择工程类型为”VisualC#工程”，然后选择“AutoCADManagedCSProjectApplication”模板。在工程名字框中输入”Lab2”，然后选择工程存放的位置。点击确定按钮，“AutoCADManagedCSharpApplicationWizard”对话框将会出现。因为我们不需要使用非托管代码，所以不要选择“EnableUnmanagedDebugging”项。“RegisteredDeveloperSymbol”将会使用你在安装ObjectARX向导时输入的值。单击”finish”按钮来创建工程。

2)下面来看一下向导生成的工程。在解决方案浏览器中，你会看到acdbmgd和acmgd已经被引用了。在Class.cs文件中，“Autodesk.AutoCAD.Runtime”命名空间已被导入，工程使用“RegisteredDeveloperSymbol”的名字来命名缺省的公有类。向导还为类加入了一个CommandMethod属性和一个函数，它们用于AutoCAD命令。

3)在前一章中，我们使用一个“Autodesk.AutoCAD.EditorInput.Editor”类的实例对象在AutoCAD命令行上输出文本。在这一章中，我们将使用这个类来提示用户在AutoCAD图形中选择一个点，然后将用户选择的点的x,y,z值显示出来。和前一章一样，请导入Autodesk.AutoCAD.ApplicationServices和Autodesk.AutoCAD.EditorInput命名空间。

4)把向导生成的CommandMethod属性的值改为有意义一些的名字如“selectPoint”（函数的名字可以不用修改）。PromptPointOptions类用来设置提示字符串和其它的一些控制提示的选项。这个类的一个实例作为参数被传入到Editor.GetPoint方法。在函数的开始，实例化这个类，设置字符串参数为“Selectapoint”。因为Editor.GetPoint方法会返回一个PromptPointResult类的实例对象，所以我们也要把它实例化。

PromptPointOptionsprPointOptions=

newPromptPointOptions("Selectapoint");

PromptPointResultprPointRes;

5)接下来实例化一个Editor类的对象并使用参数为PromptPointOptions对象的GetPoint方法。用GetPoint方法的返回值来给上面声明的PromptPointResult对象赋值。赋值好以后，我们可以测试PromptPointResult对象的状态，如果不是OK就返回。

prPointRes=ed.GetPoint(prPointOptions);

if(prPointRes.Status!=PromptStatus.OK)

{

ed.WriteMessage("Error");

}

6)如果PromptPointResult对象返回了一个有效的点，我们就可以使用WriteMessage方法把结果输出到命令行。PromptPointResult.Value的ToString方法使输出非常容易：

ed.WriteMessage("Youselectedpoint"

prPointRes.Value.ToString)

7)按F5来运行一个调试AutoCAD的进程。（注意：向导已经设置好用acad.exe来调试）在AutoCAD命令行中输入NETLOAD，选择Lab2.dll并打开。在命令行中输入你起的命令名字（selectPoint）。在选择点的提示下，单击图形中的任一点。如果一切正常的话，你可以在命令行中看到你所选的点的坐标值。在Class.cs文件的“ed.WriteMessage("Error");”行加入断点，然后再次运行selectPoint命令。这一次，在选择点的提示下按ESC键而不是选择一个点。PromptPointResult对象的状态就不是OK了，所以上面代码中的if语句就会被执行，“ed.WriteMessage("Error")”;语句就会被调用。

8)接下来我们将加入另外一个命令，它可以获取两个点之间的距离。向导没有添加命令的功能，所以我们需要手工添加。在Class.cs文件的选择点的函数（getPoint）下面添加一个名为getDistance的新命令。加入命令的方法请参考上一章的内容或本章的源代码，这里就不列出了。使用CommandMethod属性并使字符串参数为“getdistance”或其它类似的名字。在命令的函数中使用PromptDistanceOptions代替PromptPointOptions。当然GetDistance方法的返回值是一个PromptDoubleResult类的实例对象，所以请用PromptDoubleResult来代替PromptPointResult：

PromptDistanceOptionsprDistOptions=new

PromptDistanceOptions("Finddistance,selectfirstpoint:");

PromptDoubleResultprDistRes;

prDistRes=ed.GetDistance(prDistOptions);

9)和前面的命令一样，也可以测试PromptDoubleResult的状态，然后用WriteMessage方法在命令行中显示值。

if(prDistRes.Status!=PromptStatus.OK)

{

ed.WriteMessage("Error");

}

else

{

ed.WriteMessage("Thedistanceis:"+prDistRes.Value.ToString());

}

Chapter 3数据库基础:?创建我们自己的Employee对象

打开Lab3文件夹下的Lab3工程文件，或或接着Lab2的代码。

在这一章中，我们将创建一个‘Employee对象’（包括一个圆，一个椭圆和一个多行文本对象），这个对象属于一个自定义的EmployeeBlock’块（这个块驻留在‘EmployeeLayer’层，当在模型空间插入这个块的时候，‘EmployeeLayer’层就会拥有这个块的一个块索引）。本章的每一个步骤中的代码都可以运行，这样做的目的可以使你更清楚地知道每一部分代码完成的功能。Step 1将简要说明一下如何在模型空间创建一个圆。

这一章的重点是在AutoCAD中访问数据库的基础。主要内容包括事务处理（Transaction）、对象Id（ObjectId）、符号表（symboltables，如块表BlockTable和层表LayerTable）以及对象引用。使用的其它一些对象如颜色Color、三维点Point3d和三维向量Vector3d，都和各自的步骤有关，但重点应该放在数据库基础上。

1)创建一个名为‘CREATE’的命令，它调用函数CreateEmployee()。这个函数用来在模型空间(MODELSPACE)的（10，10，0）点处创建一个半径为2.0的圆：

[CommandMethod("test")]

staticpublicvoidvoidcreateCircle()

{

//首先声明我们要使用的对象

Circlecircle;//这个是我们要加入到模型空间的圆

BlockTableRecordbtr;//要加入圆，我们需要打开模型空间

BlockTablebt;//要打开模型空间，我们需要通过块表(BlockTable)来访问它

//我们使用一个名为‘Transaction’的对象，把函数中有关数据库的操作封装起来

Transactiontrans;

//使用TransactionManager的StartTransaction()成员来开始事务处理

trans=HostApplicationServices.WorkingDatabase.TransactionManager.StartTransaction();

//现在创建圆……请仔细看这些参数——注意创建Point3d对象的‘New’和Vector3d的静态成员ZAxis

circle=newCircle(newPoint3d(10,10,0),Vector3d.ZAxis,2);

bt=(BlockTable)trans.GetObject(HostApplicationServices.WorkingDatabase.BlockTableId,OpenMode.ForRead);

//使用当前的空间Id来获取块表记录——注意我们是打开它用来写入

btr=(BlockTableRecord)trans.GetObject(HostApplicationServices.WorkingDatabase.CurrentSpaceId,OpenMode.ForWrite);

//现在使用btr对象来加入圆

btr.AppendEntity(circle);

trans.AddNewlyCreatedDBObject(circle,true);//并确定事务处理知道要加入圆！

//一旦完成以上操作，我们就提交事务处理，这样以上所做的改变就被保存了……

trans.Commit();

//…然后销毁事务处理，因为我们已经完成了相关的操作（事务处理不是数据库驻留对象，可以销毁）

trans.Dispose();

}

请仔细阅读一下上面的代码块的结构，可以通过注释来了解相关的细节。

注意：要编译代码，你需要导入Autodesk.AutoCAD.DatabaseServices和Autodesk.AutoCAD.Geometry命名空间

运行这个函数来看看它是否可行。应该会在图形中创建一个在(10,10,0)处的半径为2.0的白色的圆。

2)我们可以减少代码的输入量，这可以通过声明一个Database变量代替HostApplicationServices.WorkingDatabase来实现：

Databasedb=HostApplicationServices.WorkingDatabase;

使用这个变量来代替在代码中出现的HostApplicationServices.WorkingDatabase。

3)在上面的代码中，我们没有使用任何异常处理，而异常处理对一个正确的.NET应用程序来说是非常重要的。我们要养成使用异常处理的好习惯，所以让我们在这个函数中加入try-catch-finally。

4)为了使代码紧凑，我们可以把许多变量的声明和初始化放在同一个语句中。现在，你的代码看起来应该是这样的：

[CommandMethod("CREATE")]

publicvoidCREATEEMPLOYEE()

{

Databasedb=HostApplicationServices.WorkingDatabase;

Editored=Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.MdiActiveDocument.Editor;

Transactiontrans=db.TransactionManager.StartTransaction();

try

{

Circlecircle=newCircle(newPoint3d(10,10,0),Vector3d.ZAxis,2);

BlockTablebt=(BlockTable)trans.GetObject(db.BlockTableId,OpenMode.ForRead);

BlockTableRecordbtr=(BlockTableRecord)trans.GetObject(HostApplicationServices.WorkingDatabase.CurrentSpaceId,OpenMode.ForWrite);

btr.AppendEntity(circle);

trans.AddNewlyCreatedDBObject(circle,true);

trans.Commit();

}

catch

{

ed.WriteMessage("Error");

}

finally

{

trans.Dispose();

}

}

运行你的代码来进行测试……

上面的catch块只显示一个错误信息。实际的清理工作是在finally块中进行的。这样做的理由是如果在事务处理被提交（Commit()）之前，Dispose()被调用的话，事务处理会被销毁。我们认为如果在trans.Commit()之前出现任何错误的话，你应该销毁事务处理（因为Commit将永远不会被调用）。如果在Dispose()之前调用了Commit()，也就是说没有任何错误发生，那么事务处理将会被提交给数据库。

所以基于上面的分析，Catch块其实并不是不可或缺的，因为它只用来通知用户程序出现了一个错误。它将在下面的代码中被去掉。

5)现在让我们在Employee加入剩下的部分：椭圆和多行文本的实例。

多行文本实体：

中心点应该与圆心的创建一样：

（建议：创建一个名为‘center’而值为10,10,0的Point3d变量来表示中心点）

多行文本的内容可以是你的名字。

椭圆（提示：你可以先看一下Ellipse的构造函数）

法向量应该沿着Z轴（请查看Vector3d类型）

主轴设为Vector3d(3,0,0)（提示：不要忘了用new）

半径比例设为0.5

椭圆还需要闭合（也就是说，开始和结束点需要相同）

运行你的代码来进行测试……应该可以生成一个圆、一个椭圆和一个中心点在10,10,0的多行文本。

注意：和事务处理对象有关的.NETAPI中的Try-Catch-Finally块结构，应该是异常观察者。实际上我们是在try块中实例化对象的，但没有显式地销毁它们。当产生异常的时候可能会产生问题，特别是当观察者注意到我们实际上用的是封装的非托管对象！记住，当资源不再使用的时候，垃圾收集机制就会回收内存。垃圾收集机制会不时的调用封装类的Dispose()方法，删除非托管对象。

这里还要注意的是Dispose()作用于封装的非托管类对象的方式取决于对象是否是数据库驻留对象。由非数据库驻留对象调用的Dispose()会删除非托管对象，而由数据库驻留对象调用的Dispose()只是关闭它们。

6)接下来让我们来创建一个新的函数，它用来新建一个颜色为黄色，名字为“EmployeeLayer”的AutoCAD层。

这个函数应该检查是否这个层已经存在，但不管这个层是否存在，函数都应该返回“EmployeeLayer”的ObjectId。下面是这个函数的代码：

publicObjectIdCreateLayer()

{

ObjectIdlayerId;//它返回函数的值

Databasedb=HostApplicationServices.WorkingDatabase;

Transactiontrans=db.TransactionManager.StartTransaction();

//首先取得层表……

LayerTablelt=(LayerTable)trans.GetObject(db.LayerTableId,OpenMode.ForWrite);

//检查EmployeeLayer层是否存在……

if(lt.Has("EmployeeLayer"))

{

layerId=lt["EmployeeLayer"];

}

else

{

//如果EmployeeLayer层不存在，就创建它

LayerTableRecordltr=newLayerTableRecord();

ltr.Name="EmployeeLayer";//设置层的名字

ltr.Color=Color.FromColorIndex(ColorMethod.ByAci,2);

layerId=lt.Add(ltr);

trans.AddNewlyCreatedDBObject(ltr,true);

}

trans.Commit();

trans.Dispose();

returnlayerId;

}

是不是觉得这个函数的基本结构与在模型空间加入实体的代码比较类似？访问数据库的方法都是这样的：使用事务处理来获取数据库对象，在符号表（模型空间所在的块表也是符号表之一）中加入实体，然后让事务处理知道。

7)???在这个函数中加入异常处理，就像在CreateEmployee函数中的一样。

8)???接下来，改变新建层的颜色。下面是实现的代码片断，请把它加入到你的代码中：

ltr.Color=Color.FromColorIndex(ColorMethod.ByAci,2)

注意：ColorMethod.ByAci可以让我们使用AutoCADACI颜色索引……这里为2（表示黄色）。

回到CreateEmployee()函数，加入把上面创建的几个实体设置到EmployeeLayer层的代码。声明一个类型为ObjectId的变量，用CreateLayer函数的返回值给它赋值。使用每个实体（文本、圆和椭圆）的LayerId属性设置它们所在的层。

例如：text.LayerId=empId

运行代码来查看“EmployeeLayer”层是否已被创建，所有已创建的实体是否都在这一层上（应该显示为黄色）

10)??现在为各个实体设置不同的颜色，可以使用ColorIndex属性（ColorIndex属性表示AutoCAD的颜色）

圆为红色－1

椭圆为绿色－3

文本为黄色－2

运行代码，看看实体的颜色是否为设置的值，即使这些实体是在“EmployeeLayer”层上。

11)接下来，我们要在AutoCAD数据库中创建一个独立的块，然后把它插入到块表而不是模型空间中。

首先把CreateEmployee函数的名字改为CreateEmployeeDefinition()。

加入以下代码来创建一个独立的块：

BlockTableRecordnewBtr=newBlockTableRecord();

newBtr.Name="EmployeeBlock";

newBtrId=bt.Add(newBtr);

trans.AddNewlyCreatedDBObject(newBtr,true);

12)??现在，请稍微改动一下加入实体到模型空间的代码（改为加入块到块表中，记得加入前要打开块表）。

现在运行代码，然后使用INSERT命令来检查是否可以正确插入这个块。

13)The last，我们要创建一个位于模型空间的块索引，它表示上面创建的块的一个实例。这一步留给大家练习。

下面是你要遵循的基本的步骤：

创建一个名为CreateEmployee新的函数

把命令属性“CREATE”移动到CreateEmployee()

修改CreateEmployeeDefintion()来返回新创建的块“EmployeeBlock”的ObjectId，操作的步骤请参考CreateLayer()的作法。

你需要修改CreateEmployeeDefintion()来查看块表中是否已包含“EmployeeBlock”块，如果包含这个块，则返回它的ObjectId（做法与CreateLayer()一样）。

提示：把‘bt’的声明语句移动到try块的顶部，使用BlockTable.Has()方法，把其它的代码移动到else语句：

try

{

//获取BlockTable对象

BlockTablebt=(BlockTable)trans.GetObject(db.BlockTableId,OpenMode.ForWrite);

if((bt.Has("EmployeeBlock")))

{

newBtrId=bt["EmployeeBlock"];

}

else

{

…

在新创建的CreateEmployee()函数中创建一个新的BlockReference对象，并把它加入到模型空间。提示：我们可以使用CreateEmployeeDefinition()中引用模型空间的代码，这些代码在这里不需要了

在CreateEmployee中调用CreateEmployeeDefinition()函数，使上面生成的BlockReference对象的BlockTableRecord()指向CreateEmployeeDefinition()函数。提示：请参考BlockReference的构造函数。

附加的问题：

让我们来看一下代码的运行情况，执行命令会生成一个EmployeeBlock的块索引，你会看到它被插入到20,20,0而不是10,10,0。为什么？

如果你知道原因，那么怎样才能使块索引插入到正确的点？

当你用List命令查看块索引时，它会告诉你它位于0层（或者当命令运行时位于当前层）。为什么？

怎样才能让块索引总是位于EmployeeLayer层？

第4章数据库基础2:?添加自定义数据

在这一章中，我们将创建一个新的字典对象，它用来表示我们雇员就职的‘Acme公司‘（呵呵，当然是虚构的一家公司）的部门。这个“部门”字典对象将包含一个表示部门经理的记录。我们还会加入代码到雇员创建过程，这个过程会加入一个索引到雇员工作的部门。

我们要说明的是如何在DWG文件中创建自定义数据，包括“每个图形”的自定义数据和“每个实体”的自定义数据。“每个图形”的自定义数据是指只在整个图形中加入一次的数据，它表示对象可以引用的单一类型或特性。“每个实体”的自定义数据是指是为特定的对象或数据库中的实体加入的数据。

在下面的示例中，我们将加入“每个图形”的自定义数据到命名对象字典(简称NOD)。NOD存在于每一个DWG文件中。“每个实体”的自定义数据加入到一个名为“扩展字典”的字典（可选）中，它表示每一个雇员。每一个由DBObject派生的对象都拥有存储自定义数据的扩展字典。而在我们的示例中将包含这种自定义数据如名字、薪水和部门。

因此这一章的重点是字典对象和扩展记录（XRecord），它们是我们用来表示自定义数据的容器。

首先让我们来创建表示公司的条目。在本章的前几个步骤中，我们将创建如下所示的部门层次结构：

NOD－命名对象字典

ACME_DIVISION－自定义公司字典

销售(Sales)－部门字典

部门经理－部门条目

请打开Lab4文件夹下的Lab4工程，或接着Lab3的代码。

我们首先要做的是定义一个新的函数，它用来在命名对象字典(NOD)中创建公司字典对象。为这个函数取名为CreateDivision(),，并使用命令属性来定义CREATEDIVISION命令。

下面是这个函数的代码，它的形式非常简单，只是用来在NOD中创建一个ACME_DIVISION（用来表示公司）

[CommandMethod("CreateDivision")]

publicvoidCreateDivision()

{

Databasedb=HostApplicationServices.WorkingDatabase;

Transactiontrans=db.TransactionManager.StartTransaction();

try

{

//首先，获取NOD……

DBDictionaryNOD=(DBDictionary)trans.GetObject(db.NamedObjectsDictionaryId,OpenMode.ForWrite);

//定义一个公司级别的字典

DBDictionaryacmeDict;

try

{

//如果ACME_DIVISION不存在，则转到catch块，这里什么也不做

acmeDict=(DBDictionary)trans.GetObject(NOD.GetAt("ACME_DIVISION"),OpenMode.ForRead);

}

catch

{

//如果ACME_DIVISION不存在，则创建它并把它加入到NOD中……

acmeDict=newDBDictionary();

NOD.SetAt("ACME_DIVISION",acmeDict);

trans.AddNewlyCreatedDBObject(acmeDict,true);

}

trans.Commit();

}

finally

{

trans.Dispose();

}

}

请仔细阅读一下上面的代码块的结构，可以通过注释来了解相关的细节。特别要注意的是我们是如何用一个try-catch块来处理ACME_DIVISION是否存在？如果ACME_DIVISION字典不存在，GetObject()将会抛出异常，catch块被执行，它会创建一个新的字典。

运行这个函数来看它是否可行。可以使用数据库查看工具来检查字典是否已被加入（建议使用ARXSDK的ArxDbg工具）

接下来，我们要在ACME_DIVISION字典中加入销售(Sales)条目。销售(Sales)条目同样也是一个字典。由于销售(Sales)字典与ACME_DIVISION字典的关系如同ACME_DIVISION字典与NOD，所以代码是类似的。定义下面的代码部分在ACME_DIVISION字典中创建一个名为’Sales’的字典。

代码提示：

DBDictionarydivDict;

try

{

divDict=(DBDictionary)trans.GetObject(acmeDict.GetAt("Sales"),OpenMode.ForWrite);

}

catch

…

运行函数来看‘Sales’条目是否已加入到ACME_DIVISION字典。

现在我们要在这个字典中加入一个特殊的记录，它可以包含任意的自定义数据。我们要加入的数据类型为扩展记录（XRecord），它可以包含任何东西，因此我们可以让它包含ResultBuffer类的对象（就是有些人可能非常熟悉的‘resbuf’）。ResultBuffer可以存储不同类型的预定义数据。扩展记录存储任意数目的ResultBuffer关系列表，因此可能会很大。下表是可以包含在ResultBuffer中一些数据类型（位于Database类的DxfCode枚举中）：

Start

0

Text

1

XRefPath

1

ShapeName

2

BlockName

2

AttributeTag

2

SymbolTableName

2

MstyleName

2

SymTableRecName

2

AttributePrompt

3

DimStyleName

3

LinetypeProse

3

TextFontFile

3

在下面的代码部分，我们将创建只包含一个ResultBuffer的扩展记录。这个ResultBuffer包含一个单一的的字符串值，它表示’Sales’部门的部门经理的名字。我们使用和加入字典一样的方法加入扩展记录。区别是扩展记录与字典的不同：

mgrXRec=newXrecord();

mgrXRec.Data=newResultBuffer(newTypedValue((int)DxfCode.Text,"RandolphP.Brokwell"));

请看一下我们是怎样使用new来创建一个新的扩展记录。但我们也使用了new来创建一个ResultBuffer，传入的参数是一个名为‘TypedValue’的对象。‘TypedValue’对象和C++中resbuf的成员‘restype’是类似的。这个对象一般表示一个特定类型的DXF值，我们使用它来组装诸如扩展数据或扩展记录之类的通用数据容器。在这里，我们简单地使用DxfCode.Text键值和“RandolphP.Brokwell”数据值来定义一个TypedValue，然后把它作为单一的参数传入ResultBuffer构造函数(由new来调用)中。

XRecord的’Data’属性实际上正是扩展记录链的1st ResultBuffer，我们使用它来表示扩展记录链是从什么地方开始的。

所以接下来的代码块看起来和前面两个非常相似：

XrecordmgrXRec;

try

{

mgrXRec=(Xrecord)trans.GetObject(divDict.GetAt("DepartmentManager"),OpenMode.ForWrite);

}

catch

{

mgrXRec=newXrecord();

mgrXRec.Data=newResultBuffer(newTypedValue((int)DxfCode.Text,"RandolphP.Brokwell"));

divDict.SetAt("DepartmentManager",mgrXRec);

trans.AddNewlyCreatedDBObject(mgrXRec,true);

}

运行函数并使用数据库查看工具来确定部门经理已被加入到’Sales’字典。

4)我们已经定义了公司字典，现在我们要把每个雇员的数据加入到前一章定义的块索引中。我们要加入的数据是：名字、薪水和雇员所属的部门。要加入这些数据，我们要同前几个步骤一样使用扩展记录。因为我们要加入三个条目，所以我们要使扩展记录可以把这些数据联系在一起。

一般来说，扩展记录只能存在于字典中。而我们要为每个雇员加入这些数据（就是本章开头所讲的“每个图形”的自定义数据和“每个实体”的自定义数据），那应该怎么做呢？答案就是：每一个对象或AutoCAD中的实体实际上都有一个名为’扩展字典（ExtensionDictionary）’的可选字典。我们可以把扩展记录直接加入到这个字典中。

请回到我们在上一章创建的CreateEmployee()函数。这个函数是我们创建块索引的地方。

让我们像前面的步骤一样来创建一个新的扩展记录。因为我们要加入3个条目，因此我们既可以使用ResultBuffer的Add方法（它会在扩展记录链中加入一个链接），也可以利用ResultBuffer的构造函数（它的一种构造函数可以输入可变数量的参数）。

无论用哪一种方法，请在CreateEmployee()函数中使用ResultBuffer来创建一个新的XRecord，ResultBuffer包括以下的类型和值：

Text–“EarnestShackleton”???????(或是你选择的其它雇员的名字)

Real–72000???????????????或者更多的薪水J

Text–“Sales”??????????????雇员所在的部门

5)要把上面的扩展记录加入到块索引，我们需要把它加入到扩展字典。通常这个字典是不存在的，除非它被明确地创建，块索引就是这种情况。要给一个对象创建扩展字典，你要调用它的成员‘CreateExtensionDictionary()’。这个函数不返回任何值，所以要访问它创建的扩展字典，你还得使用对象的‘ExtensionDictionary’属性。你可以使用类似于以下的代码来创建并访问扩展字典：

br.CreateExtensionDictionary();

DBDictionarybrExtDict?=(DBDictionary)trans.GetObject(br.ExtensionDictionary,OpenMode.ForWrite,false);

由于扩展字典也是字典，我们可以和第3步一样在扩展字典中加入扩展记录。请完成有关的代码来创建和访问块索引的扩展字典，加入你在第4步中创建的扩展记录，然后把扩展记录加入到事务处理。

6)返回到NOD……因为在NOD中创建公司字典只需要一次（就像创建Employee块一样），因此我们应该把CreateDivision函数的命令属性去掉，而在CreateEmployeeDefinition()中调用这个函数。请自己完成这些改变。当所有这些都做完后，当CREATE命令1st time运行的时候，所有的函数都会被调用。

7)下面的步骤和上面的无关。我们将创建一个函数来遍历模型空间，以用来查找加入的Employee对象（这里其实是块索引）的数目。在VB.NET或C#中，我们可以把模型空间块表记录（ModelSpaceBlockTableRecord）当作一个集合，这样就可以使用ForEach(C#是foreach)来遍历它。请仔细研究一下下面的代码片断：

VB.NET:

DimidAsObjectId‘?首先，定义一个For循环要使用的ObjectId变量。

ForEachidInbtr

DimentAsEntity=trans.GetObject(id,OpenMode.ForRead,False)'打开当前的对象!

C#:

foreach(ObjectIdidinbtr)

{

Entityent=(Entity)trans.GetObject(id,OpenMode.ForRead,false);?//打开当前的对象!

一旦我们获得模型空间对象，你们就可以定义一个ObjectId变量，然后把它用于ForEach循环(C#是foreach)。

现在，我们需要使用一些方法来筛选雇员。我们知道模型空间中的对象都是实体，但不全是雇员。我们需要使用一些方法来加以区分。在这里，我们可以使用VB.NET的TypeOf关键字并用CType进行类型转换（C#是GetType函数和typeof）：

VB.NET:

IfTypeOfentIsBlockReferenceThen

DimbrAsBlockReference=CType(ent,BlockReference)

…

C#:

If(ent.GetType()==typeof(BlockReference))

BlockReferencebr=(BlockReference)ent;

上面讲的概念对于AutoCAD编程是很重要的，因为容器对象经常包含不同类型的对象。你会在AutoCAD程序的开发中经常碰到这种类型转化。

请定义一个名为EmployeeCount()的函数，函数的结构如上所示，它用来统计模型空间中的块索引的数目。这个函数不会输出任何东西，但你可以使用逐步调试程序来查看整数变量的增加（每发现一个块索引对象）。

8)接下来，为了把结果输出到命令行，我们需要使用Application.DocumentManager.MdiActiveDocument.Editor对象的服务。要使用它，请加入下面的代码：

ImportsAutodesk.AutoCAD.EditorInput

ImportsAutodesk.AutoCAD.ApplicationServices

在函数的内部：

Editored=Application.DocumentManager.MdiActiveDocument.Editor;

The last ，在循环的后面确定找到了多少个块索引：

ed.WriteMessage("EmployeesFound:"+nEmployeeCount.ToString());

第四章结束

下面的代码片断演示了怎样获取Employee对象的所有内容，包括ACME_DIVISION字典中的部门经理的名字。这部分要在后面的章节中使用，但因为它和本章有关，因此我们把它放在本章作介绍。如果有时间的话，请阅读一下其中的代码来看看它是怎么使用的。它可以被直接放到你的类中并可以运行。命令的名字是PRINTOUTEMPLOYEE。ListEmployee()函数接收一个ObjectId参数，它通过一个ref类型的字符串数组返回值（包含相应的雇员数据）。调用它的PrintoutEmployee()函数只是用来在命令行中输出这些数据。

我们需要一个遍历并显示所有雇员数据的命令。

publicstaticvoidListEmployee(ObjectIdemployeeId,refstring[]saEmployeeList)

{

intnEmployeeDataCount=0;

Databasedb=HostApplicationServices.WorkingDatabase;

Transactiontrans=db.TransactionManager.StartTransaction();//开始事务处理。

try

{

Entityent=(Entity)trans.GetObject(employeeId,OpenMode.ForRead,false);//打开当前对象!

if(ent.GetType()==typeof(BlockReference))

{

//不是所有的块索引都有雇员数据，所以我们要处理错误

boolbHasOurDict=true;

XrecordEmployeeXRec=null;

try

{

BlockReferencebr=(BlockReference)ent;

DBDictionaryextDict=(DBDictionary)trans.GetObject(br.ExtensionDictionary,OpenMode.ForRead,false);

EmployeeXRec=(Xrecord)trans.GetObject(extDict.GetAt("EmployeeData"),OpenMode.ForRead,false);

}

catch

{

bHasOurDict=false;//出现了错误……字典或扩展记录不能访问

}

if(bHasOurDict)//如果获得扩展字典，而又有扩展记录……

{

为雇员列表分配内存

saEmployeeList=newString[4];

加入雇员的名字

TypedValueresBuf=EmployeeXRec.Data.AsArray()[0];

saEmployeeList.SetValue(string.Format("{0}/n",resBuf.Value),nEmployeeDataCount);

nEmployeeDataCount+=1;

//加入雇员的薪水

resBuf=EmployeeXRec.Data.AsArray()[1];

saEmployeeList.SetValue(string.Format("{0}/n",resBuf.Value),nEmployeeDataCount);

nEmployeeDataCount+=1;

加入雇员所在的部门

resBuf=EmployeeXRec.Data.AsArray()[2];

stringstr=(string)resBuf.Value;

saEmployeeList.SetValue(string.Format("{0}/n",resBuf.Value),nEmployeeDataCount);

nEmployeeDataCount+=1;

现在，让我们从公司字典中获取老板的名字

在NOD中找到.

DBDictionaryNOD=(DBDictionary)trans.GetObject(db.NamedObjectsDictionaryId,OpenMode.ForRead,false);

DBDictionaryacmeDict=(DBDictionary)trans.GetObject(NOD.GetAt("ACME_DIVISION"),OpenMode.ForRead);

//注意我们直接使用扩展数据...

DBDictionarysalesDict=(DBDictionary)trans.GetObject(acmeDict.GetAt((string)EmployeeXRec.Data.AsArray()[2].Value),OpenMode.ForRead);

XrecordsalesXRec=(Xrecord)trans.GetObject(salesDict.GetAt("DepartmentManager"),OpenMode.ForRead);

The last，把雇员的数据输出到命令行

resBuf=salesXRec.Data.AsArray()[0];

saEmployeeList.SetValue(string.Format("{0}/n",resBuf.Value),nEmployeeDataCount);

nEmployeeDataCount+=1;

}

}

trans.Commit();

}

finally

{

trans.Dispose();

}

}

[CommandMethod("PRINTOUTEMPLOYEE")]

publicstatic?voidPrintoutEmployee()

{

Editored=Application.DocumentManager.MdiActiveDocument.Editor;

//声明我们将在下面使用的工具...

Databasedb=HostApplicationServices.WorkingDatabase;

Transactiontrans=db.TransactionManager.StartTransaction();

try

{

//首先，获取块表和模型空间块表记录

BlockTablebt=(BlockTable)trans.GetObject(HostApplicationServices.WorkingDatabase.BlockTableId,OpenMode.ForRead);

BlockTableRecordbtr=(BlockTableRecord)trans.GetObject(bt[BlockTableRecord.ModelSpace],OpenMode.ForRead);

//现在，我们需要把内容输出到命令行。这里可以有一个对象帮助我们：

//下面的部分，我们将遍历模型空间:

foreach(ObjectIdidinbtr)

{

Entityent=(Entity)trans.GetObject(id,OpenMode.ForRead,false);//打开当前对象!

if(entisBlockReference)

{

string[]saEmployeeList=null;//这是正确的...定义新的列表。

ListEmployee(id,refsaEmployeeList);

if((saEmployeeList.Length==4))

{

ed.WriteMessage("EmployeeName:{0}",saEmployeeList[0]);

ed.WriteMessage("EmployeeSalary:{0}",saEmployeeList[1]);

ed.WriteMessage("EmployeeDivision:{0}",saEmployeeList[2]);

ed.WriteMessage("DivisionManager:{0}",saEmployeeList[3]);

}

}

}

}

finally

{

}

}

Chapter 5用户互操作：提示和选择

背景

提示通常包含一个描述性信息，伴随一个停止以让用户理解所给的信息并输入数据。数据可以通过多种方式被输入，如通过命令行、对话框或AutoCAD编辑窗口。给出的提示要遵循一定的格式，格式要与一般的AutoCAD提示相一致，这一点是非常重要的。例如，关键字要用“/”号分隔并放在方括号“[]”中，缺省值要放在“<>”内。对于一个AutoCAD用户来说，坚持统一的格式将会减少信息理解错误的产生。

当用户在AutoCAD命令行中选择一个实体时，实体是使用选择机制被选择的。这种机制包括一个提示，用来让用户知道选择什么并怎样选择（如，窗口或单一实体），然后是一个停顿。

试一下诸如PINE这种命令来看一下提示的显示，PEDIT来看一下使用单一实体或多线来进行选择。

练习

Prompts:

提示：

在本章中，我们将提示输入雇员名字、职位、薪水和部门来创建一个雇员块索引对象。如果输入的部门不存在，我们将提示输入部门经理的名字来创建一个新的部门。在我们继续之前，让我们试着重用以前的代码。

为了进行选择，我们将提示用户在一个窗口中进行选择或选择一个实体，而我们只显示选择集中的雇员对象。

在前面的章节中，我们创建了一个名叫“EarnestShackleton”的雇员，名字被存储为“EmployeeBlock”块定义（块表记录）中的MText。如果我们多次插入这个块，那么我们看到的都是同一个雇员的名字。我们怎样才能自定义这个块以使每次插入这个块的时候显示不同雇员的名字？这就要使用块属性的功能了。属性是存储在每一个块索引实例中的文本，并被作为实例的一部分来被显示。属性从存储在块表记录中的属性定义中继承相关的属性。

属性：

让我们来把MText实体类型改变为属性定义。在CreateEmployeeDefinition()函数中，把下面的代码替换

文本:

MTexttext=newMText();

text.Contents="EarnestShackleton";

text.Location=center;

为

属性定义

AttributeDefinitiontext=newAttributeDefinition(center,"NoName","Name:","EnterName",db.Textstyle);

text.ColorIndex=2;

试着使用TEST命令来测试一下CreateEmployeeDefinition()函数：

[CommandMethod("Test")]

public?voidTest()

{

CreateEmployeeDefinition();

}

你现在应该可以使用INSERT命令来插入EmployeeBlock块并对每一个实例确定一个雇员名。

当你插入Employee块时，请注意一下块插入的位置。它是正好被放置在所选点还是有些偏移？试试怎样修复它。（提示：检查块定义中的圆心）

修改CreateEmployee()以重用

1)让我们来修改CreateEmployee()函数，以让它可以接收名字、薪水、部门和职位并返回创建的雇员块索引的ObjectId。函数的形式如下（你可以改变参数顺序）

publicObjectIdCreateEmployee(stringname,stringdivision,doublesalary,Point3dpos)

2)移除上面函数中的CommandMethod属性”CREATE”，这样它就不再是用来创建雇员的命令。

3修改函数的代码，这样就可以正确地设置块索引的名字、职位、部门和薪水和它的扩展字典。

替换

BlockReferencebr=newBlockReference(newPoint3d(10,10,0),CreateEmployeeDefinition());

为

BlockReferencebr=newBlockReference(pos,CreateEmployeeDefinition());

替换

xRec.Data=newResultBuffer(

newTypedValue((int)DxfCode.Text,"EarnestShackleton"),

newTypedValue((int)DxfCode.Real,72000),

newTypedValue((int)DxfCode.Text,"Sales"));

为

xRec.Data=newResultBuffer(

newTypedValue((int)DxfCode.Text,name),

newTypedValue((int)DxfCode.Real,salary),

newTypedValue((int)DxfCode.Text,division));

4)因为我们把雇员的名字从MText替换成块的属性定义，因此我们要创建一个相应的属性索引来显示雇员的名字。属性索引将使用属性定义的属性。

btr.AppendEntity(br);//加入索引到模型空间

trans.AddNewlyCreatedDBObject(br,true);//让事务处理知道

为

AttributeReferenceattRef=newAttributeReference();

遍历雇员块来查找属性定义

BlockTableRecordempBtr=(BlockTableRecord)trans.GetObject(bt["EmployeeBlock"],OpenMode.ForRead);

foreach(ObjectIdidinempBtr)

{

Entityent=(Entity)trans.GetObject(id,OpenMode.ForRead,false);

打开当前的对象!

if(entisAttributeDefinition)

{

设置属性为属性索引中的属性定义

AttributeDefinitionattDef=((AttributeDefinition)(ent));

attRef.SetPropertiesFrom(attDef);

attRef.Position=newPoint3d(attDef.Position.X+br.Position.X,attDef.Position.Y+br.Position.Y,attDef.Position.Z+br.Position.Z);

attRef.Height=attDef.Height;

attRef.Rotation=attDef.Rotation;

attRef.Tag=attDef.Tag;

attRef.TextString=name;

}

}

把索引加入模型空间

btr.AppendEntity(br);

把属性索引加入到块索引

br.AttributeCollection.AppendAttribute(attRef);

让事务处理知道

trans.AddNewlyCreatedDBObject(attRef,true);

trans.AddNewlyCreatedDBObject(br,true);

研究一下上面的代码，看看是怎样把属性定义中除显示用的文本字符串外的属性复制到属性索引的。属性被加入到块索引的属性集合中。这就是你怎样来为每一个实例自定义雇员名字。

5)不要忘记返回雇员块索引的ObjectId，但要在提交事务处理之后才能返回：

trans.Commit();

returnbr.ObjectId;

6)测试CreateEmployee。

加入一个Test命令来测试CreateEmployee：

[CommandMethod("Test")]

public?voidTest()

{

CreateEmployee("EarnestShackleton","Sales",10000,newPoint3d(10,10,0));

}

修改CreateDivision()以重用：

让我们来修改CreateDivision()函数，以让它可以接收部门名字、经理名字并返回创建的部门经理扩展记录的ObjectId。如果部门经理已经存在，则不改变经理的名字。

1)如果你先前在CreateEmployeeDefinition()中调用了CreateDivision()，请把它注释掉，因为我们在这里不需要创建一个部门

2)改变CreateDivision()的形式让它接收部门和经理的名字并返回一个ObjectId。

publicObjectIdCreateDivision(stringdivision,stringmanager)

3)修改上面函数的代码创建部门的名字和经理：

divDict=(DBDictionary)trans.GetObject(acmeDict.GetAt("Sales"),OpenMode.ForWrite);

divDict=(DBDictionary)trans.GetObject(acmeDict.GetAt(division),OpenMode.ForWrite);

acmeDict.SetAt("Sales",divDict);

为:

acmeDict.SetAt(division,divDict);

mgrXRec.Data=newResultBuffer(newTypedValue((int)DxfCode.Text,"RandolphP.Brokwell"));

为:

mgrXRec.Data=newResultBuffer(newTypedValue((int)DxfCode.Text,manager));

不要忘了返回部门经理这个扩展记录的ObjectId，但要在提交事务处理后才返回。

trans.Commit();

返回部门经理这个扩展记录的ObjectId

returnmgrXRec.ObjectId;

现在把在中CreateEmployeeDefinition调用的CreateDivision函数给注释掉。

4)???现在通过使用TEST命令来测试调用CreateDivision函数。使用ArxDbg工具来检查条目是否已被加入到“ACME_DIVISION”下的命名对象字典。

CreateDivision("Sales","RandolphP.Brokwell")

使用CREATE命令来创建雇员：

我们将加入一个名为CREATE的新命令，此命令用来提示输入雇员的详细资料来创建雇员块索引。让我们来看一下这个命令是怎样使用的。

1)让我们加入一个名为CREATE的新命令，并声明几个常用的变量和一个try-finally块。

[CommandMethod("CREATE")]

publicvoidCreateEmployee()

{Databasedb=HostApplicationServices.WorkingDatabase;

Editored=Application.DocumentManager.MdiActiveDocument.Editor;

2)让我们来为雇员定义可以用作为提示缺省值的常数。注意，布尔值gotPosition是用来判断用户是否已输入职位。

把这些常数加入到try语句后面：

stringempName=?"EarnestShackleton";

stringdivName=?"Sales";

doublesalary=newdouble();

salary=10000;

Point3dposition=newPoint3d(0,0,0);

boolgotPosition=newbool();

布尔值用来判断用户是否已输入职位

gotPosition=false;

3)现在让我们提示用户输入值。我们先使用PromptXXXOptions类来初始化要显示的提示字符串。

提示输入每个雇员的详细资料

PromptStringOptionsprName=newPromptStringOptions("EnterEmployeeName<" + empName + ">");

PromptStringOptionsprDiv=newPromptStringOptions("EnterEmployeeDivision<" + divName + ">");

PromptDoubleOptionsprSal=newPromptDoubleOptions("EnterEmployeeSalary<" + salary + ">");

PromptPointOptionsprPos=newPromptPointOptions("EnterEmployeePositionor");

注意，提示字符串用尖括号来显示变量的值。这是AutoCAD用来提示用户这个值为缺省值。

4)当提示用户输入职位时，我们也提供了一个关键字列表选项，如名字、部门和薪水。如果用户想要在选择一个点的时候改变为其它值，他可以选择那个关键字。

一个命令提示的例子如下：

Command:CREATE

EnterEmployeePositionor[Name/Division/Salary]:

要创建一个雇员，用户会选择一个点而其它的值被设置为缺省值。如果用户要改变其它的值，如名字，他可以输入”N”或全名”Name”，然后输入名字：

Command:CREATE

EnterEmployeePositionor[Name/Division/Salary]:N

EnterEmployeeName:

如果用户想要再次选择缺省的名字，他可以按回车键。

让我们创建用于职位提示的关键字列表：

//加入用于职位提示的关键字

prPos.Keywords.Add("Name");

prPos.Keywords.Add("Division");

prPos.Keywords.Add("Salary");

设置提示的限制条件

prPos.AllowNone=false;不允许没有值

5)现在让我们声明PromptXXXResult变量来获取提示的结果：

promptresults

PromptResultprNameRes;

PromptResultprDivRes;

PromptDoubleResultprSalRes;

PromptPointResultprPosRes;

6)直到用户成功输入一个点后，循环才结束。如果输入错误的话，我们会提示用户并退出函数：

判断用户是否输入了关键字，我们通过检查promptresult的状态来进行：

循环用来获取雇员的详细资料。当职位被输入后，循环终止。

while(!gotPosition)

{

提示输入职位

prPosRes=ed.GetPoint(prPos);

取得一个点

if(prPosRes.Status==PromptStatus.OK)

{gotPosition=true;

position=prPosRes.Value;}

elseif(prPosRes.Status==PromptStatus.Keyword)//获取一个关键字

{输入了Name关键字

if(prPosRes.StringResult=="Name")

prName.AllowSpaces=true;

prNameRes=ed.GetString(prName);

if(prNameRes.Status!=PromptStatus.OK)

如果获取雇员名字成功

if(prNameRes.StringResult!="")

7)上面的代码只提示输入名字，请加入提示输入薪水和部门的代码。

8)完成提示输入后，我们将使用获得的值来创建雇员。

创建雇员

CreateEmployee(empName,divName,salary,position);

9)现在来检查部门经理是否已存在。我们通过检查NOD中部门的扩展记录中的经理名字来进行。如果检查到的是一个空字符串，那么我们会提示用户输入经理的名字。注意，通过修改CreateDivision()函数，获取经理的名字变得简单了。

stringmanager="";

创建部门

给经理传入一个空字符串来检查它是否已存在

XrecorddepMgrXRec;

ObjectIdxRecId;

xRecId=CreateDivision(divName,manager);

/打开部门经理扩展记录

depMgrXRec=(Xrecord)trans.GetObject(xRecId,OpenMode.ForRead);

TypedValue[]typedVal=depMgrXRec.Data.AsArray();

foreach(TypedValuevalintypedVal)

经理没有被设置，现在设置它

先提示输入经理的名字

ed.WriteMessage("/r/n");

PromptStringOptionsprManagerName=newPromptStringOptions("Nomanagersetforthedivision!EnterManagerName");

prManagerName.AllowSpaces=true;

PromptResultprManagerNameRes=ed.GetString(prManagerName);

if(prManagerNameRes.Status!=PromptStatus.OK)

10)测试CREATE命令

选择集：

现在让我们来创建一个命令，当用户在图形中选择一个雇员对象时，它会显示雇员的详细资料。

我们会使用上一章中创建的ListEmployee()函数在命令行中输出雇员的详细资料。

下面是你需要遵循的步骤：

1.调用“LISTEMPLOYEES”命令

2.调用Editor的GetSelection()函数来选择实体

PromptSelectionResultres=ed.GetSelection(Opts,filter);

3.上面的filter用来过滤选择集中的块索引。你可以创建如下的过滤列表：

TypedValue[]filList=newTypedValue[1];

filList[0]=newTypedValue((int)DxfCode.Start,"INSERT");

SelectionFilterfilter=newSelectionFilter(filList);

4.从选择集中获取ObjectId数组：

如果选择失败则什么也不做

if(res.Status!=PromptStatus.OK)

return;

Autodesk.AutoCAD.EditorInput.SelectionSetSS=res.Value;

ObjectId[]idArray;

idArray=SS.GetObjectIds();

5.The last，把选择集中的每个ObjectId输入到ListEmployee()函数来获取一个雇员详细资料的字符串数组。把雇员的详细资料输出到命令行。例如：

获取saEmployeeList数组中的所有雇员

foreach(ObjectIdemployeeIdinidArray)

ListEmployee(employeeId,refsaEmployeeList);

把雇员的详细资料输出到命令行

Chapter 6更多的用户界面：添加自定义数据

在本章中，我们将介绍.NETAPI的用户界面部分能做些什么。我们首先将介绍一个自定义上下文菜单（快捷菜单）。接下来我们将实现一个无模式可停靠的面板（一个真正的AutoCAD增强辅助窗口）来支持拖放操作。接着我们将介绍通过模式窗体选取实体。The last,我们将介绍使用AutoCAD的选项对话框来设置雇员的缺省值。

本章还会介绍和上面内容有关的API。

Part 1自定义上下文菜单

到目前为止，我们所写的代码只与CommandMethod属性定义的命令行进行相互操作。一个AutoCAD.NET程序能通过一个特殊的类来实现装载时的初始化工作。这个类只要实现IExtensionApplication.NET接口并暴露一个组件级别的属性（此属性把类定义为ExtensionApplication），就可以响应一次性的装载和卸载事件。例子：

[assembly:ExtensionApplication(typeof(Lab6_CS.AsdkClass1))]

publicclassAsdkClass1:IExtensionApplication

1)现在修改AsdkClass1类来实现上面的接口。要实现这个接口，你需要实现Initialize()和Terminate()函数。因为我们要实现的是一个接口，而接口中的函数总是定义为纯虚拟的。

publicvoidInitialize()

{AddContextMenu();

EmployeeOptions.AddTabDialog();}

publicvoidTerminate()

为了加入自定义上下文菜单，我们需要定义一个‘ContextMenuExtension’类的成员。这个类位于Autodesk.AutoCAD.Windows命名空间中。

要使用ContextMenuExtension，我们需要使用new关键字来进行初始化，给必要的属性赋值，并调用Application.AddDefaultContextMenuExtension()。上下文菜单的工作方式是：对于每个菜单条目，我们定义一个成员函数来处理菜单单击事件。我们可能通过.NET的代理来实现。我们使用C#关键字+=和-=确定让哪个函数来处理事件。请尽快熟悉这种设计模式，因为在C#中会使用很多。

2)添加一个‘ContextMenuExtension’成员变量和下面两个用来添加和移除自定义菜单的函数。请好好研究一下代码来看看究竟发生了什么。

voidAddContextMenu()

m_ContextMenu=newContextMenuExtension();

m_ContextMenu.Title="AcmeEmployeeMenu";

Autodesk.AutoCAD.Windows.MenuItemmi;

mi=newAutodesk.AutoCAD.Windows.MenuItem("CreateEmployee");

mi.Click+=?newEventHandler(CallbackOnClick);

m_ContextMenu.MenuItems.Add(mi);

Autodesk.AutoCAD.ApplicationServices.Application.AddDefaultContextMenuExtension(m_ContextMenu);

{Autodesk.AutoCAD.ApplicationServices.Application.RemoveDefaultContextMenuExtension(m_ContextMenu);

m_ContextMenu=null;}

注意我们在代码中使用了‘CallbackOnClick’函数。我们希望这个函数（我们现在还没有定义）响应菜单项选择事件。在我们的例子中，我们想要做的是调用我们的成员函数‘Create()’。请加入下面的代码。

voidCallbackOnClick(objectSender,EventArgse)

现在，从Initialize()中调用AddContextMenu()函数，同样地，请在Terminate()中调用RemoveContextMenu()。

请运行代码。使用NETLOAD来装载编译好的组件，然后在AutoCAD的空白处右击……你应该可以看到’Acme‘快捷菜单了。如果失败了，明明你做的都是正确的……为什么呢？

通常，AutoCAD的数据是存储在文档中的，而访问实体的命令有权修改文档。当我们运行代码来响应上下文菜单单击事件，我们是从命令结构的外部来访问文档。当我们调用的代码尝试通过添加一个雇员来修改文档时，我们就碰到了错误。正确的做法是需要锁住文档，这可以通过使用Document.LockDocument()命令来实现。

3)修改CallbackOnClick来锁住文档：

voidCallbackOnClick(objectSender,EventArgse)

{DocumentLockdocLock=Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.MdiActiveDocument.LockDocument();

Create();

docLock.Dispose();}

注意，我们保留了一个‘DocumentLock’对象的拷贝。要把文档解锁，我们只要销毁这个DocumentLock对象。

再次运行代码。现在应该可以看到快捷菜单了。

第２部分无模式对话框、可进行拖放的可停靠面板

为了使我们的用户界面和AutoCAD实现无缝链接，我们要尽可能在所有的地方使用同样的用户界面结构。这会使应用程序看起来与AutoCAD结合的很好，并有效地减少代码的重复。一个很好的例子是AutoCAD中的可停靠面板。

使用.NETAPI，我们可以创建一个简单的窗体并把它放到面板中。我们可以实例化一个自定义的‘PaletteSet’对象来包含窗体，并可以把这个PaletteSet定义成我们喜欢的样式。

4)在解决方案浏览器中通过右击工程来添加一个用户控件。给它命名为ModelessForm。使用控件工具箱，加入如下所示的编辑框和标签控件。

使用属性窗口设置三个编辑框的属性。设置如下：

<首先是上面的编辑框>

(Name)???=tb_Name

Text=<请输入一个名字>

(Name)=tb_Division

Text=Sales

(Name)=tb_Salary

Text=<请输入薪水>

要使用.NETAPI实例化一个面板对象，你需要要实例化用户控件对象（无模式窗体）和‘PaletteSet’对象。调用PaletteSet的成员函数Add来传递用户控件对象。

5)接下来，我们要加入一个命令来创建面板。在类中加入一个名为CreatePalette的函数和CommandMethod属性来定义名为“PALETTE”的命令。

请看一下下面的代码块。这是实例化面板的代码。

ps=newAutodesk.AutoCAD.Windows.PaletteSet("TestPaletteSet");

ps.MinimumSize=newSystem.Drawing.Size(300,300);

System.Windows.Forms.UserControlmyCtrl=newModelessForm();

ps.Add("test",myCtrl);

ps.Visible=true;

6)把上面的代码加入到CreatePalette()函数。‘ps’需要在函数的外部声明：

privateAutodesk.AutoCAD.Windows.PaletteSetps;

在函数的实例化面板代码之前加入检查ps是否为null的代码。

编译并运行工程。在AutoCAD中装载组件，运行‘PALETTE’命令来检查面板是否被装载。

使用PaletteSet.Style来看看PaletteSetStyles对象。例如：

ps.Style=PaletteSetStyles.ShowTabForSingle;

我们也可以试试诸如透明性的属性，例如：

ps.Opacity=90;

注意：要使用PaletteSet和PaletteSetStyles对象，你想要加入两个命名空间Autodesk.AutoCAD.Windows和Autodesk.AutoCAD.Windows.Palette

在我们继续之前，让我们执行一个快速的维护更新：请在AsdkClass1类中加入下列成员：

publicstaticstringsDivisionDefault="Sales";

publicstaticstringsDivisionManager="FionaQ.Farnsby";

这些值将被用作为部门和部门经理的缺省值。由于它们被声明为’static’，它们在每个程序中只实例化一次，并在组件装载的时候实例化。

第2a部分在无模式窗体中加入拖放支持

在这部分，我们将加入允许我们使用面板窗体中编辑框的值来创建一个雇员。当用户从面板中拖动到AutoCAD中，将会提示输入职位，一个新的雇员实体将使用这些值来进行创建。

7)为了支持拖放，我们首先需要一个对象来进行拖动。在编辑框的下面，另外加入一个名为Label4的标签控件，设置标签的文本为一些提示性的东西（‘DragtoCreateEmployee’）。通过这个标签，我们可以在AutoCAD中处理拖放。

要捕捉到什么时候拖动事件发生，我们需要要知道什么时候鼠标开始操作。

首先，我们要在类的构造函数中注册事件，代码如下：

Label4.MouseMove+=newSystem.Windows.Forms.MouseEventHandler(Label4_MouseMove);

8)在ModelessForm类中加入下面的函数声明：

privatevoidLabel4_MouseMove(objectsender,System.Windows.Forms.MouseEventArgse)

{

if(System.Windows.Forms.Control.MouseButtons==System.Windows.Forms.MouseButtons.Left)

{

//startdragDropoperation,MyDropTargetwillbecalledwhenthecursorenterstheAutoCADviewarea.

Autodesk.AutoCAD.ApplicationServices.Application.DoDragDrop(this,this,System.Windows.Forms.DragDropEffects.All,newMyDropTarget());

}

}

通常事件处理器有2个输入参数，一个object类的sender和与事件有关的参数。对于MouseMove，我们也要做同样的事情。

运行这个工程，检查一下当鼠标经过文本的时候，函数是否被调用的。

我们还可以进一步知道是不是按了鼠标左键:

if(System.Windows.Forms.Control.MouseButtons==System.Windows.Forms.MouseButtons.Left)

{

}

我们需要一个方法来检测什么时候对象被拖入到AutoCAD。我们可以使用.NET的基类DropTarget来实现。要使用它，你只要创建从这个基类派生的类并实现你想要的函数。在我们这个例子中，我们需要的是OnDrop()。

9)在工程中加入一个从Autodesk.AutoCAD.Windows.DropTarget派生的类‘MyDropTarget’。如果你把这个类加入到ModelessForm.cs文件中，请把这个类加入到ModelessForm类之后。

overridepublicvoidOnDrop(System.Windows.Forms.DragEventArgse)

{

}

在这个函数中，我们会调用AsdkClass1的成员CreateDivision()和CreateEmployee，传入ModelessForm类中的编辑框的值。要实现这个功能，我们需要一个方法来连接ModelessForm实例。方法是通过DragEventArgs。但首先我们要把鼠标事件连接到MyDropTarget类。

10)加入下面的代码到鼠标左键（MouseButtons.Left）处理函数中：

Autodesk.AutoCAD.ApplicationServices.Application.DoDragDrop(this,this,System.Windows.Forms.DragDropEffects.All,newMyDropTarget());

注意我们传入’this’两次。 the first time用于Control参数，The second time是用于传入用户自定义数据。因为我们传入的是ModelessForm类的实例，所以我们可以在放下的时候使用它来获取编辑框的值。

11)回到OnDrop处理函数，让我们使用参数来调用创建雇员的函数。首先，添加职位提示的代码。在AsdkClass1.Create()中已经有相关的代码了，位于‘GetEmployeesCoordinates…’.注释下面。添加此代码来提示输入职位。

12)接下来，获取传入到DragEventArgs参数的ModelessForm对象：

ModelessFormctrl=(ModelessForm)e.Data.GetData(typeof(ModelessForm));

请注意一下怎样通过typeof关键字把参数强制转化为ModelessForm的实例。

13)使用上面的实例来调用AsdkClass1成员：

AsdkClass1.CreateDivision(ctrl.tb_Division.Text,AsdkClass1.sDivisionManager);

AsdkClass1.CreateEmployee(ctrl.tb_Name.Text,ctrl.tb_Division.Text,Convert.ToDouble(ctrl.tb_Salary.Text),prPosRes.Value);

注意：AsdkClass1的方法要不通过AsdkClass1的实例来调用，那么方法需要被声明为’publicstatic’。因为publicstatic方法只能调用其它的publicstatic方法，你需要修改几个AsdkClass1类中的方法为’publicstatic’。请你进行相关的修改（应该至少有4项要修改）。

14)The last，因为我们处理的事件位于AutoCAD命令之外，我们需要再次在会修改数据库的代码处锁住文档。请加入锁住文档的代码，加入的方法与前面的上下文菜单是一样的。

编译、装载并运行组件，使用PALETTE命令。你应该可以使用拖放操作来创建一个雇员了。

Part 3从有模式窗体中选择实体

本章的以下部分将演示获取一个用户在屏幕上选择的雇员实例的详细信息，并把信息显示在一个有模式窗体的编辑框中。这部分的重点是创建一个有模式窗体，并在执行选择操作而窗体要失去焦点时隐藏它。为了获取雇员的详细信息，我们将使用第4章结束时给出的ListEmployee帮助函数。

首先，我们需要创建一个窗体类。这个类是一个真实的窗体而不是我们在ModelessForm中创建的用户控件。

15)在工程中创建一个Windows窗体类。调用‘ModalForm’类。在窗体中加入以下所示的三个编辑框控件和标签控件以及两个按钮。

使用属性窗口来设置三个编辑框的属性。设置如下：

<首先是上面的编辑框>

(Name)???=tb_Name

Text=<空白>

(Name)=tb_Division

Text=<空白>

(Name)=tb_Salary

Text=<空白>

<上部的按钮>

(Name)?=SelectEmployeeButton

Text=SelectEmployee

<下部的按钮>

(Name)?=Close

Text=Close

接下来创建按钮的事件处理函数。‘Close’按钮可以只简单地调用：

this.Close();

要显示对话框，让我们在类中创建一个把窗体实例化为有模式对话框的命令函数。下面的实现的代码：

[CommandMethod("MODALFORM")]

publicvoidShowModalForm()

{

ModalFormmodalForm=newModalForm();

Autodesk.AutoCAD.ApplicationServices.Application.ShowModalDialog(modalForm);

}

编译、装载并在AutoCAD中运行MODALFORM命令来看看对话框是否可以工作。试试在对话框的右下角调整对话框的大小，然后关闭它。注意，重新使用MODALFORM命令时，对话框会出现在你上次离开的地方！这是ShowModalDialog方法的一个特征。大小和位置值被AutoCAD保存了。

‘SelectEmployee’按钮首先将执行一个简单的实体选择。这我们可以通过使用Editor.GetEntity()方法来实现，选择单一的实体比使用选择集来得方便的多。下面是怎样使用这个方法的代码：

PromptEntityOptionsprEnt=newPromptEntityOptions("SelectanEmployee");

PromptEntityResultprEntRes=ed.GetEntity(prEnt);

16)把上面的代码加入到SelectEmployeeButton_Click处理函数中，还要加入需要的数据库、命令行、事务处理设置变量和一个trycatch块。不要忘了在finally块中销毁它们。

使用PromptStatus.OK来测试GetEntity的返回值，如果返回不等于，就调用this.Show并退出处理函数。

一旦我们获得的返回值是OK,那么我们就可以使用PromptEntityResult.ObjectId()方法来获取所选实体的objectId。这个id可以和一个固定的字符串数组被传入到AsdkClass1.ListEmployee函数中来获取雇员的详细信息。可以通过以下的代码说明：

ArrayListsaEmployeeList=newArrayList();

AsdkClass1.ListEmployee(prEntRes.ObjectId,saEmployeeList);

if(saEmployeeList.Count==4)

{

tb_Name.Text=saEmployeeList[0].ToString();

tb_Salary.Text=saEmployeeList[1].ToString();

tb_Division.Text=saEmployeeList[2].ToString();

}

17)加入上面的代码，它会在窗体的编辑框中显示雇员的详细信息。

在开始测试代码之前，我们还要记住的是代码是在有模式对话框中运行的，也就意味着当对话框可见的时候用户与AutoCAD的互操作是被禁止的。在用户能够进行选择雇员对象之前，我们需要隐藏窗体。当选择结束后，我们可以再次站窗体显示（例如，可以在finally块的函数中）

18)在选择之前加入隐藏窗体的代码（例如在try块之前）‘this.Hide’和选择结束后显示窗体的代码（例如，可以在finally块中）‘this.Show’。

编译、装载并在AutoCAD中运行MODALFORM命令来看看对话框是否工作。试试选择一个实体并填充窗体中编辑框的值。

第四部分在AutoCAD选项对话框中加入页面

本章的The last部分将向你介绍如何定义一个用户控件，这个控件可以被作为一个页面显示在AutoCAD的选项对话框中。我们可以使用这个页面来设置程序运行期间的缺省值。在Employee例子中，我们只是在AsdkClass1类中简单地设置了sDivisionDefault和sDivisionManager字符串。

19)在工程中加入另外一个名为‘EmployeeOptions’的用户控件。在控件中加入两个编辑框和标签控件，如下图所示：

使用属性窗口来设置编辑框的属性，设置如下：

<上面的编辑框>

(Name)???=tb_EmployeeDivision

Text=<空白>

<下面的编辑框>

(Name)=tb_DivisionManager

Text=<空白>

使用.NETAPI来显示自定义多页对话框，需要两个步骤。首先，通过传入要调用的成员函数的地址，来知道什么时候选项对话框出现。其次是实现回调函数。传入到回调函数中的the second参数是一个‘TabbedDialogEventArgs’对象，我们需要使用它来调用‘AddTab’函数。AddTab使用一个标题字符串和一个‘TabbedDialogExtension’对象的实例，此实例封装了我们的窗体（其实是用户控件）。在TabbedDialogExtension的构造函数中，我们输入窗体的实例和回调函数（OnOK,OnCancel或OnHelp）的地址。

20)在EmployeeOptions类中，加入一个名为AddTabDialog的publicstatic函数，它会添加一个可供系统调用的事件处理：

publicstaticvoidAddTabDialog()

{

Autodesk.AutoCAD.ApplicationServices.Application.DisplayingOptionDialog+=newTabbedDialogEventHandler(TabHandler);

}

在AsdkClass1的Initialize函数中加入调用此函数的代码。因为这个函数是在程序启动的时候调用的（因为类已经实现了IExtensionApplication接口），所以多页对话框就被自动的加载。

20a)实现一个相同的函数来移除事件处理，使用C#的-=关键字。

在这里，你可以看到我们为AutoCAD中的Application对象的DisplayingOptionDialog事件加入了一个处理函数，此函数会调用‘TabHandler’函数。所以接下来我们要实现这个函数。

21)加入下面的代码来实现处理函数：

privatestaticvoidTabHandler(objectsender,Autodesk.AutoCAD.ApplicationServices.TabbedDialogEventArgse)

{

EmployeeOptionsEmployeeOptionsPage=newEmployeeOptions();

e.AddTab("AcmeEmployeeOptions",

newTabbedDialogExtension(

EmployeeOptionsPage,

newTabbedDialogAction(EmployeeOptionsPage.OnOk)));

}

我们首先实例化了一个EmployeeOptions对象。然后调用e.AddTab()，在这个函数中传入了一个TabbedDialogExtension的实例。TabbedDialogExtension的构造函数使用了EmployeeOptionsPage实例和一个TabbedDialogAction对象。TabbedDialogAction对象的参数可以是Ok,Cancel或Help回调函数。在这个函数中，我们使用的是OK。

22)现在剩下的就是确定回调函数的内容，也就是ONOK的内容。前面已经说过了，我们只要设置AsdkClass1的static成员，也就是设置tb_DivisionManager和tb_EmployeeDivision编辑框中的值。下面是代码：

publicvoidOnOk()

{

AsdkClass1.sDivisionDefault=tb_EmployeeDivision.Text;

AsdkClass1.sDivisionManager=tb_DivisionManager.Text;

}

编译、装载并选择AutoCAD的选项菜单项来看一下我们的自定义对话框。试试设置对话框中的值并实例化一个雇员。你可以使用PRINTOUTEMPLOYEE命令来查看详细信息。

附加的问题：怎样让对话框的编辑框能自动显示为AsdkClass1中的Manager和Division字符串的内容？

第７章事件

本章将讨论AutoCAD中的事件。我们将介绍事件处理函数的使用，特别是监视AutoCAD命令的事件处理函数和监视被AutoCAD命令修改的对象的事件处理函数。在解释怎样在C#中实现AutoCAD的事件处理之前，我们将首先简要地讨论一下.NET中的事件。

The first partC#中的事件

事件只是用来通知一个行为已经发生的信息。在ObjectARX中，我们使用反应器(reactor)来处理AutoCAD的事件。而在AutoCAD.NETAPI中，ObjectARX反应器被换成了事件。

事件处理函数（或者叫回调函数）是用来监视和反馈程序中出现的事件。事件可以以不同的形式出现。

在介绍AutoCAD.NETAPI中的事件之前，让我们先来简单地了解一下代理。

1a部分代理

代理是一个存储方法索引的类（概念与函数指针类似）。代理对方法是类型安全的（与C中的函数指针类似）。代理有特定的形式和返回类型。代理可以封装符合这种特定形式的任何方法。

代理的一个用途就是作为产生事件的类的分发器。事件是.NET环境中Level 1的对象。虽然C#把事件处理的许多细节给隐藏掉了，但事件总是由代理来实现的。事件代理可以多次调用（就是它们可以存储多于１个的事件处理方法的索引）。它们保存了用于事件的一个注册事件处理的列表。一个典型的代理有以下的形式：

publicdelegateEvent(Objectsender,EventArgse)

first参数sender表示引发事件的对象。the second参数e是一个EventArgs参数（或者是一个派生的类），这个对象通常包含用于事件处理函数的数据。

１b部分+=和-=语句

要使用事件处理函数，我们需要把它与事件联系起来。这要通过使用+=语句。+=和-=允许你在运行时连接、断开或修改与事件联系的处理函数。

当我们使用+=语句时，我们要确定事件引发者的名字，并要使用new语句来确定事件处理函数，例如：

MyClass1.AnEvent+=new?HandlerDelegate(EHandler)

前面我们说过要使用-=语句从事件处理函数中断开事件（移除联系）。语法如下所示：

MyClass1.AnEvent-=new?HandlerDelegate(EHandler)

第２部分处理.NET中的AutoCAD事件

在ObjectARX中，我们使用反应器来封装AutoCAD事件。在AutoCAD.NETAPI中，我们可以使用事件来代替ObjectARX反应器。

通常，处理AutoCAD事件的步骤如下：

1.创建事件处理函数

当一个事件发生时，事件处理函数（或称为回调函数）被调用。任何我们想要处理的回应AutoCAD事件的动作都在事件处理函数中进行。

例如，假定我们只想通知用户一个AutoCAD对象已被加入。我们可以使用AutoCAD数据库事件”ObjectAppended”来完成。我们可以编写回调函数（事件处理函数）如下：

publicvoidobjAppended(objecto,ObjectEventArgse)

{

//在这里加入处理代码

}

函数中的first参数代表AutoCAD数据库。the second参数代表ObjectEventArgs类，它可能包含对处理函数有用的数据。

2.把事件处理函数与事件联系起来

为了开始监视动作，我们需要把事件处理函数与事件联系起来。在这里，当一个对象加入到数据库时，ObjectAppended事件将会发生。但是，事件处理函数不会响应这个事件，除非我们把它与这个事件联系起来，例如：

Databasedb;

db=HostApplicationServices.WorkingDatabase;

db.ObjectAppended+=newObjectEventHandler(objAppended);

3.断开事件处理函数

要终止监视一个动作，我们需要断开事件处理函数与事件的联系。当对象被加入时，我们想要停止通知用户这个事件，我们要断开事件处理函数与事件ObjectAppended的联系。

db.ObjectAppended-=newObjectEventHandler(objAppended);

第３部分使用事件处理函数来控制AutoCAD的行为

本章的目的是解释AutoCAD事件怎样才能被用于控制AutoCAD图形中的行为。现在，让我们使用前一章（第六章）的内容在AutoCAD图形中创建几个EMPLOYEE块索引。我们不想让用户能改变EMPLOYEE块索引的位置，而对于其它的非EMPLOYEE块索引的位置则没有这个限制。我们将混合使用数据库与文档事件来做到这一点。

首先，我们想要监视将要被执行的AutoCAD命令（使用CommandWillStart事件）。特别地，我们要监视MOVE命令。另外，当一个对象要被修改时，我们应该被通知（使用ObjectOpenedForModify事件），这样我们可以确定它是否为一个EMPLOYEE块索引。如果这时就修改对象可能是无效的，因为我们的修改可能会再次触发事件，从而引起不稳定的行为。所以，我们要等待Move命令的执行结束（使用CommandEnded事件），这时就可以安全地修改对象了。当然，任何对块索引的修改将会触发ObjectOpenedForModify事件。我们还需要设置一些全局变量来表明一个MOVE命令在运行和被修改的对象是一个EMPLOYEE块索引。

注意：因为本章需要比较多的代码来获得想要的结果，所以我们不会解释任何与事件处理无关的代码，而只是将它们粘贴到事件处理函数中。这里的重点是成功创建和注册事件处理函数。

Step 1：创建新工程

我们以第六章的工程开始。请新加入一个类AsdkClass2。我们还要加入四个全局变量。前两个是Boolean型的：一个用来表示我们监视的命令是否是活动的，另外一个用来表示ObjectOpenedForModify事件处理函数是否该被忽略。

全局变量

boolbEditCommand;

boolbDoRepositioning;

接下来，我们要声明一个全局变量来表示一个ObjectIdCollection，它用来存储我们所选择的要修改的对象的ObjectID。

ObjectIdCollectionchangedObjects=newObjectIdCollection();

The last，我们要声明一个全局变量来表示一个Point3dCollection，它用来包含我们所选对象的位置（三维点）。

Point3dCollectionemployeePositions=newPoint3dCollection();

Step 2：创建first文档事件处理函数（回调函数）

现在我们要创建一个事件处理函数。当AutoCAD命令开始执行的时候它会通知我们。我们要检查GlobalCommandName的值是否为MOVE。

if(e.GlobalCommandName=="MOVE")

如果MOVE命令开始执行的话，我们要相应地设置Boolean变量bEditCommand的值，这样我们可以知道我们所监视的命令是活动的。同样地，我们应该把另外一个Boolean变量bDoRepositioning设置为false来忽略ObjectOpenedForModify事件处理函数。两个变量设置好以后，在命令活动期间，我们需要获得所选块索引的信息。

我们还应该把两个集合对象的内容清空。我们只关心当前选择的对象。

Step 3：创建数据库事件处理函数（回调函数）

无论什么时候一个对象被打开并要被修改时，数据库事件处理函数会被调用。当然，如果这时我们监视的命令不是活动的，我们就应该跳过任何被这个回调函数调用的内容。

if(bEditCommand==false)

{

return;

}

同样地，如果我们监视的命令已经结束，而ObjectOpenedForModify事件被另一个回调函数再次触发的话，而这时有对象被修改时，我们要阻止所有由这个回调函数执行的动作。

if(bDoRepositioning==true)

{

return;

}

这个回调函数剩余部分的代码用来验证我们是否正在处理EMPLOYEE块索引。如果是的话，我们就获取它的ObjectID和位置（三维点）。下面的代码可以被粘贴到这个事件处理函数函数。

publicvoidobjOpenedForMod(objecto,ObjectEventArgse)

{

if(bEditCommand==false)

{

return;

}

if(bDoRepositioning==true)

{

return;

}

ObjectIdobjId;

objId=e.DBObject.ObjectId;

Transaction?trans;

Database?db;

db=HostApplicationServices.WorkingDatabase;

trans=db.TransactionManager.StartTransaction();

using(Entityent?=(Entity)trans.GetObject(objId,OpenMode.ForRead,false))

{

if(ent.GetType().FullName.Equals("Autodesk.AutoCAD.DatabaseServices.BlockReference"))

{//Weuse.NET//sRTTItoestablishtype.

BlockReferencebr??=(BlockReference)ent;

//Testwhetheritisanemployeeblock

//openitsextensiondictionary

if(br.ExtensionDictionary.IsValid)

{

using(DBDictionarybrExtDict?=(DBDictionary)trans.GetObject(br.ExtensionDictionary,OpenMode.ForRead))

{

if(brExtDict.GetAt("EmployeeData").IsValid)

{

//successfullygot"EmployeeData"sobrisemployeeblockref

//StoretheobjectIDandtheposition

changedObjects.Add(objId);

employeePositions.Add(br.Position);

//Gettheattributereferences,ifany

AttributeCollectionatts;

atts=br.AttributeCollection;

if(atts.Count>0)

{

foreach(ObjectIdattIdinatts)

{

AttributeReferenceatt;

using(att=(AttributeReference)trans.GetObject(attId,OpenMode.ForRead,false))

{

changedObjects.Add(attId);

employeePositions.Add(att.Position);

trans.Commit();

第４步创建the second个文档事件处理函数（回调函数）

当一个命令结束时，第三个事件处理函数被调用。同样地，我们要检查全局变量来验证这个将要结束的命令是我们监视的命令。如果是我们监视的，那么我们要重置这个变量：

if(bEditCommand==false)

{

return;

}

bEditCommand=false;

这个回调函数执行的动作将会再次触发ObjectOpenedForModify事件。我们需要确定在这个回调函数中跳过了所有与此事件有关的动作。

//设置标志来跳过OpenedForModify处理函数

bDoRepositioning=true;

这个回调函数的剩余代码用来把EMPLOYEE块索引和它的关联属性引用的当前（修改过的）位置与它们的初始位置作比较。如果位置改变了，我们在这个回调函数中把它们重置这初始的位置。下面的代码可以被粘贴到这个事件处理函数中。

publicvoidcmdEnded(objecto?,CommandEventArgse)

{

//Wasourmonitoredcommandactive?

if(bEditCommand==false)

{

return;

}

bEditCommand=false;

//SetflagtobypassOpenedForModifyhandler

bDoRepositioning=true;

Databasedb??=HostApplicationServices.WorkingDatabase;

Transactiontrans;

BlockTablebt;

Point3doldpos;

Point3dnewpos;

inti;

for(i=0;i< changedObjects.Count; i++)

{

trans=db.TransactionManager.StartTransaction();

using(bt=(BlockTable)trans.GetObject(db.BlockTableId,OpenMode.ForRead))

{

using(Entityent??=(Entity)trans.GetObject(changedObjects[i],OpenMode.ForWrite))

{

if(ent.GetType().FullName.Equals("Autodesk.AutoCAD.DatabaseServices.BlockReference"))

{//Weuse.NET//sRTTItoestablishtype.

BlockReferencebr=(BlockReference)ent;

newpos=br.Position;

oldpos=employeePositions[i];

//Resetblockrefposition

if(!oldpos.Equals(newpos))

{

using(trans.GetObject(br.ObjectId,OpenMode.ForWrite))

{

br.Position=oldpos;

elseif(ent.GetType().FullName.Equals("Autodesk.AutoCAD.DatabaseServices.AttributeReference"))

{

AttributeReferenceatt=(AttributeReference)ent;

newpos=att.Position;

oldpos=employeePositions[i];

//Resetattrefposition

if(!oldpos.Equals(newpos))

{

using(trans.GetObject(att.ObjectId,OpenMode.ForWrite))

{

att.Position=oldpos;

trans.Commit();

}

}

Step 5创建命令来注册/断开事件处理函数

创建一个ADDEVENTS命令，使用+=语句来把上面的３个事件处理函数连接到各自的事件。在这个命令中，我们还应该设置全局Boolean变量：

bEditCommand=false;

bDoRepositioning=false;

创建另外一个命令REMOVEEVENTS，使用-=语句把事件处理函数与事件断开。

Step 6：测试工程

要测试这个工程，请使用CREATE命令创建一个或多个EMPLOYEE块索引。如果你要作比较的话，你也可以插入一些非EMPLOYEE的块索引。

在命令行中键入ADDEVENTS命令来执行它。

在命令行中输入MOVE命令，然后选择你想要的块索引。注意，当MOVE命令结束时，EMPLOYEE块索引（包括属性）还留在原处。

执行REMOVEEVENTS命令，然后在试一下MOVE命令。注意，EMPLOYEE块索引现在可以被移动了。

附加的问题：添加一个附加的回调函数，当用户改变EMPLOYEE块索引的”Name”属性时，这个回调函数被触发。