[ARX]ObjectARX managed wrapper classes参考中文档（3）

zhf7878 发表于 2004-7-16 14:17:00

在托管程序中使用事务处理<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /><o:p></o:p>

和ObjectARX程序一样，托管程序总是在数据库事务处理环境下对DWG数据库执行操作。你应当使用下述的异常处理技巧：<o:p></o:p>

使用带异常处理的事务处理<o:p></o:p>

1. 通过调用Transaction.StartTransaction()方法，在try块之前启动一个事务处理<o:p></o:p>

2. 在try块内，使用事务处理对象来进行和数据库有关的操作。<o:p></o:p>

3. 通过调用Transaction.Commit()方法，在try块的末尾提交事务处理。<o:p></o:p>

4. 通过调用Transaction.Dispose()方法在finally块中销毁事务处理。<o:p></o:p>

上述步骤保证事务处理对象被销毁， 而不管在try块中可能出现的任何异常。下面的例子描述了这一技巧：

//C#

<PRE>public static void HyperCommand(){</PRE><PRE>Database db = Application.DocumentManager.MdiActiveDocument.Database;</PRE><PRE>DBTransMan tm = db.TransactionManager；</PRE><PRE>//开始一个事务处理</PRE><PRE>Transaction myT = tm.StartTransaction()；</PRE><PRE>Try 
{</PRE><PRE style="TEXT-INDENT: 24pt">//创建一条直线</PRE><PRE>Line line=new Line(New Point3d(0, 0, 0), New Point3d(1, 1, 0));</PRE><PRE>BlockTable bt = CType(tm.GetObject(_</PRE><PRE> db.BlockTableId, OpenMode.ForRead, False), BlockTable);</PRE><PRE>BlockTableRecord btr = </PRE><PRE> CType(tm.GetObject(bt(BlockTableRecord.ModelSpace),</PRE><PRE> OpenMode.ForWrite, False), BlockTableRecord);</PRE><PRE> '把直线加入到model space block table record</PRE><PRE> btr.AppendEntity(line)；</PRE><PRE style="TEXT-INDENT: 24pt">'确定事务处理知道这个新加入的对象</PRE><PRE style="TEXT-INDENT: 24pt">tm.AddNewlyCreatedDBObject(line, true)；</PRE><PRE> '添加一些超链接 </PRE><PRE> HyperLink hyper=new HyperLink();</PRE><PRE> hyper.Name = "www.autodesk.com";</PRE><PRE> line.Hyperlinks.Add(hyper);</PRE><PRE style="TEXT-INDENT: 24pt">If(line.Hyperlinks.Contains(hyper))</PRE><PRE style="TEXT-INDENT: 24pt"> hyper.Name = "www.gotdotnet.com";</PRE><PRE> line.Hyperlinks.Add(hyper)</PRE><PRE style="TEXT-INDENT: 24pt">int i;</PRE><PRE style="TEXT-INDENT: 24pt">for(i =0; i < line.Hyperlinks.Count; i ++)</PRE><PRE> Debug.WriteLine(line.Hyperlinks(i).ToString());</PRE><PRE> //提交事务处理</PRE><PRE style="TEXT-INDENT: 24pt">myT.Commit()；</PRE><PRE>}</PRE><PRE>finally</PRE><PRE>{</PRE><PRE style="TEXT-INDENT: 24pt">myT.Dispose();</PRE><PRE>}</PRE><PRE>}</PRE><PRE> <o:p></o:p></PRE><PRE>'VB.NET<o:p></o:p></PRE><PRE>Public Shared Sub HyperCommand()</PRE><PRE>Dim db As Database =</PRE><PRE> Application.DocumentManager.MdiActiveDocument.Database</PRE><PRE>Dim tm As DBTransMan = db.TransactionManager</PRE><PRE>'start a transaction</PRE><PRE>Dim myT As Transaction = tm.StartTransaction()</PRE><PRE>Try</PRE><PRE> 'create a line</PRE><PRE> Dim line As New Line(New Point3d(0, 0, 0), New Point3d(_</PRE><PRE> 1, 1, 0))</PRE><PRE> Dim bt As BlockTable = CType(tm.GetObject(_</PRE><PRE> db.BlockTableId, OpenMode.ForRead, False), BlockTable)</PRE><PRE> Dim btr As BlockTableRecord =</PRE><PRE> CType(tm.GetObject(bt(BlockTableRecord.ModelSpace),</PRE><PRE> OpenMode.ForWrite, False), BlockTableRecord)</PRE><PRE> 'add it to the model space block table record</PRE><PRE> btr.AppendEntity(line)</PRE><PRE> 'make sure that the transaction knows about this new object</PRE><PRE> tm.AddNewlyCreatedDBObject(line, True)</PRE><PRE> 'add some hyperlinks </PRE><PRE> Dim hyper As New HyperLink()</PRE><PRE> hyper.Name = "www.autodesk.com"</PRE><PRE> line.Hyperlinks.Add(hyper)</PRE><PRE> If line.Hyperlinks.Contains(hyper) Then</PRE><PRE> hyper.Name = "www.gotdotnet.com"</PRE><PRE> End If</PRE><PRE> line.Hyperlinks.Add(hyper)</PRE><PRE> Dim i As Integer</PRE><PRE> For i = 0 To line.Hyperlinks.Count - 1</PRE><PRE> Debug.WriteLine(line.Hyperlinks(i).ToString())</PRE><PRE> Next i 'commit transaction</PRE><PRE> myT.Commit()</PRE><PRE>Finally</PRE><PRE> myT.Dispose()</PRE><PRE>End Try</PRE><PRE>End Sub 'HyperCommand</PRE>
使用ResultBuffer类

在ObjectARX中，resbuf结构给AutoCAD专门数据提供了一个灵活的存储器。在托管API中，这个结构被映射在Autodesk.AutoCAD.DatabaseServices.ResultBuffer类中。

一个ResultBuffer类对象使用的方法与resbuf数据链相同。你要定义一个ResultBuffer并使它产生一系列的数据对。每一对数据由一个数据类型描述和一个值组成。在托管API中，这些数据对是Autodesk.AutoCAD.DatabaseServices.TypedValue类的实例。这个类实现的功能与resbuf结构的restype和resval成员一样。<o:p></o:p>

TypedValue.TypeCode属性是一个16位的整数值，它表示TypedValue.Value属性的数据类型。可以使用的TypeCode值取决于ResultBuffer实例的具体使用情况。例如，适合于xrecord定义的TypeCode的值就不一定适用于xdata。Autodesk.AutoCAD.DatabaseServices.DxfCode枚举定义的代码精确地描述了所有可能的ResultBuffer数据类型的范围。<o:p></o:p>

因为TypedValue.Value属性与System.Object的一个实例相对应，所以它可以包含任何数据类型。但是，Value数据必须与TypeCode所表示的类一致，以保证结果的可用性。

你可以通过给ResultBuffer的构造函数传递一个TypedValue对象数组来提前产生一个ResultBuffer，或者可以先构造一个空的ResultBuffer，然后通过调用ResultBuffer::Add()方法来加入新的TypedValue对象。一个典型的ResultBuffer构造函数的用法如下例所示：<o:p></o:p>

//C#<o:p></o:p>

Xrecord rec=new Xrecord();

<PRE>rec.Data = New ResultBuffer( _</PRE><PRE>New TypedValue(CInt(DxfCode.Text), "This is a test"), _</PRE><PRE>New TypedValue(CInt(DxfCode.Int8), 0), _</PRE><PRE>New TypedValue(CInt(DxfCode.Int16), 1), _</PRE><PRE>New TypedValue(CInt(DxfCode.Int32), 2), _</PRE><PRE>New TypedValue(CInt(DxfCode.HardPointerId),</PRE><PRE> db.BlockTableId), _</PRE><PRE>New TypedValue(CInt(DxfCode.BinaryChunk), </PRE><PRE>New Byte(){0, 1, 2, 3, 4}), _</PRE><PRE>New TypedValue(CInt(DxfCode.ArbitraryHandle), db.BlockTableId.Handle), _</PRE><PRE>New TypedValue(CInt(DxfCode.UcsOrg), New Point3d(0, 0, 0)));</PRE>
'VB.NET

<PRE>Dim rec As New Xrecord()</PRE><PRE>rec.Data = New ResultBuffer( _</PRE><PRE>New TypedValue(CInt(DxfCode.Text), "This is a test"), _</PRE><PRE>New TypedValue(CInt(DxfCode.Int8), 0), _</PRE><PRE>New TypedValue(CInt(DxfCode.Int16), 1), _</PRE><PRE>New TypedValue(CInt(DxfCode.Int32), 2), _</PRE><PRE>New TypedValue(CInt(DxfCode.HardPointerId),</PRE><PRE> db.BlockTableId), _</PRE><PRE>New TypedValue(CInt(DxfCode.BinaryChunk), </PRE><PRE>New Byte(){0, 1, 2, 3, 4}), _</PRE><PRE>New TypedValue(CInt(DxfCode.ArbitraryHandle), db.BlockTableId.Handle), _</PRE><PRE>New TypedValue(CInt(DxfCode.UcsOrg), New Point3d(0, 0, 0)))</PRE>
 <o:p></o:p>

托管程序的初始化和运行时优化<o:p></o:p>

托管程序如果要执行初始化或结束任务，那么可以通过实现可选的Autodesk.AutoCAD.Runtime.IextensionApplication接口来进行。这个接口提供Initialize()和Terminate()方法。因为托管程序不能手动卸载，Terminate()方法只有当AutoCAD运行的时候才能调用。<o:p></o:p>

如果程序中定义了大量的类，那么你可以通过实现IextensionApplication接口和使用两个可选的通用属性来优化程序。这两个属性是：ExtensionApplication和CommandClass，它们可以帮助AutoCAD找到程序的初始化路径和命令处理器。

任何托管程序都可以使用这两个属性。但是，只有在大型程序中才能体现它们的优化效果。

 <o:p></o:p>

 <o:p></o:p>

 <o:p></o:p>

页: [1]

明经CAD社区's Archiver

[ARX]ObjectARX managed wrapper classes参考中文档（3）