C#下是否有等同fromAcDbTextStyle()的实现方法

newer

Equivalent to fromAcDbTextStyle() under C# (.NET)

Issue
Is there any way to use the fromAcDbTextStyle() function in my .NET application?

解答：
One workaround for your issue is to use standard .NET P/Invoke technique. The sample below shows code for importing “fromAcDbTextStyle” in .NET.

1.     [DllImport("acdb18.dll", CharSet = CharSet.Unicode, CallingConvention = CallingConvention.Cdecl,
   
2.     EntryPoint = ?fromAcDbTextStyle@@YA?AW4ErrorStatus@Acad@@AAVAcGiTextStyle@@PB_W@Z)]
   
3.     private static extern ErrorStatus fromAcDbTextStyle(System.IntPtr style, string styleName);
   
4.     [CommandMethod("getTextStrWidth")]
   
5.     public void getTextStrWidth()
   
6.     {
   
7.       Document doc = Application.DocumentManager.MdiActiveDocument;
   
8.       Database db = doc.Database;
   
9.       Editor ed = doc.Editor;
   
10.       PromptResult pr = ed.GetString("\nEnter a string: ");
    
11.       if (pr.Status != PromptStatus.OK) return;
    
12.       using (Transaction Tx = db.TransactionManager.StartTransaction())
    
13.       {
    
14.         TextStyleTable TxtStlTbl = Tx.GetObject(db.TextStyleTableId, OpenMode.ForRead) as TextStyleTable;
    
15.         string styleName = "STANDARD";
    
16.         if (!TxtStlTbl.Has(styleName))
    
17.         {
    
18.           ed.WriteMessage("\nStyle " + styleName + " doesn't exist :(");
    
19.           return;
    
20.         }
    
21.         Autodesk.AutoCAD.GraphicsInterface.TextStyle iStyle = new Autodesk.AutoCAD.GraphicsInterface.TextStyle();
    
22.         if (fromAcDbTextStyle(iStyle.UnmanagedObject, styleName) == ErrorStatus.OK)
    
23.         {
    
24.           Extents2d ex = iStyle.ExtentsBox(pr.StringResult, true, true, null);
    
25.           double width = ex.MaxPoint.X - ex.MinPoint.X;
    
26.           double height = ex.MaxPoint.Y - ex.MinPoint.Y;
    
27.           ed.WriteMessage("\n-Width = " + width.ToString() + "\n-Height = " + height.ToString());
    
28.         }
    
29.       }
    
30.     }
    

    [DllImport("acdb18.dll", CharSet = CharSet.Unicode, CallingConvention = CallingConvention.Cdecl,<br />     EntryPoint = ?fromAcDbTextStyle@@YA?AW4ErrorStatus@Acad@@AAVAcGiTextStyle@@PB_W@Z)]<br />     private static extern ErrorStatus fromAcDbTextStyle(System.IntPtr style, string styleName);<br />     [CommandMethod("getTextStrWidth")]<br />     public void getTextStrWidth()<br />     {<br />       Document doc = Application.DocumentManager.MdiActiveDocument;<br />       Database db = doc.Database;<br />       Editor ed = doc.Editor;<br />       PromptResult pr = ed.GetString("\nEnter a string: ");<br />       if (pr.Status != PromptStatus.OK) return;<br />       using (Transaction Tx = db.TransactionManager.StartTransaction())<br />       {<br />         TextStyleTable TxtStlTbl = Tx.GetObject(db.TextStyleTableId, OpenMode.ForRead) as TextStyleTable;<br />         string styleName = "STANDARD";<br />         if (!TxtStlTbl.Has(styleName))<br />         {<br />           ed.WriteMessage("\nStyle " + styleName + " doesn't exist :(");<br />           return;<br />         }<br />         Autodesk.AutoCAD.GraphicsInterface.TextStyle iStyle = new Autodesk.AutoCAD.GraphicsInterface.TextStyle();<br />         if (fromAcDbTextStyle(iStyle.UnmanagedObject, styleName) == ErrorStatus.OK)<br />         {<br />           Extents2d ex = iStyle.ExtentsBox(pr.StringResult, true, true, null);<br />           double width = ex.MaxPoint.X - ex.MinPoint.X;<br />           double height = ex.MaxPoint.Y - ex.MinPoint.Y;<br />           ed.WriteMessage("\n-Width = " + width.ToString() + "\n-Height = " + height.ToString());<br />         }<br />       }<br />     }<br />