使用COM API插入图块

LoveArx

Here is a sample ObjectARX code to demonstrate the usage of InsertBlock method of the AutoCAD COM API.

1. #pragma warning( disable : 4278 )
   
2. // Makes change to the tlb name based on the AutoCAD version.
   
3. // For ex : acax18enu.tlb for AutoCAD 2010/2011 and 2012
   
4. //          acax19enu.tlb for AutoCAD 2013
   
5. #import "acax19ENU.tlb" no_implementation raw_interfaces_only named_guids
   
6. #pragma warning( default : 4278 )
   
7. 
   
8. #include <acadi.h>
   
9. static void ADSProjectInsertBlock(void)
   
10. {
    
11.     int ret = RTNORM;
    
12. 
    
13.     TCHAR drawingFilePath[500];
    
14.     drawingFilePath[0] = _T('\0');
    
15.     ret = acedGetString (
    
16.                             NULL,
    
17.                             _T("Enter file path : "),
    
18.                             drawingFilePath
    
19.                         );
    
20.     if(ret != RTNORM)
    
21.         return;
    
22. 
    
23.     ads_point insertionPoint;
    
24.     ret = acedGetPoint(
    
25.                         NULL,
    
26.                         _T("\nEnter insertion point: "),
    
27.                         insertionPoint
    
28.                        );
    
29.     if(ret != RTNORM)
    
30.         return;
    
31. 
    
32.     CWinApp *pApp = acedGetAcadWinApp();
    
33.     HRESULT hRes;
    
34.     LPDISPATCH pDisp=NULL;
    
35. 
    
36.     if(!pApp)
    
37.         return;
    
38. 
    
39.     pDisp=pApp->GetIDispatch(TRUE);
    
40.     if    (!pDisp)
    
41.           return;
    
42. 
    
43.     CComPtr<AutoCAD::IAcadApplication>  pComApp;
    
44.     hRes=pDisp->QueryInterface(
    
45.                                 IID_IAcadApplication,
    
46.                                 (void**)&pComApp
    
47.                               );
    
48.     if (FAILED(hRes))
    
49.           return;
    
50. 
    
51.     CComPtr<AutoCAD::IAcadDocument> pComDoc;
    
52.     hRes=pComApp->get_ActiveDocument(&pComDoc);
    
53.     if(FAILED(hRes))
    
54.         return;
    
55. 
    
56.     CComPtr<AutoCAD::IAcadModelSpace> pMSpace = NULL;
    
57.     pComDoc->get_ModelSpace(&pMSpace);
    
58. 
    
59.     _bstr_t block(drawingFilePath);
    
60.     CComPtr<AutoCAD::IAcadBlockReference> pBlkRef = NULL;
    
61. 
    
62.     SAFEARRAYBOUND rgsaBound;
    
63.     rgsaBound.lLbound = 0L;
    
64.     rgsaBound.cElements = 3;
    
65.     SAFEARRAY* pInsertionPoint = NULL;
    
66.     pInsertionPoint = SafeArrayCreate(VT_R8, 1, &rgsaBound);
    
67. 
    
68.     for(long i = 0; i < 3; i++)
    
69.     {
    
70.         double value = insertionPoint;
    
71.         SafeArrayPutElement(
    
72.                                 pInsertionPoint,
    
73.                                 &i,
    
74.                                 &value
    
75.                             );
    
76.     }
    
77. 
    
78.     VARIANT vInsertionPoint;
    
79.     VariantInit(&vInsertionPoint);
    
80.     V_VT(&vInsertionPoint) = VT_ARRAY | VT_R8;
    
81.     V_ARRAY(&vInsertionPoint) = pInsertionPoint;
    
82. 
    
83.     double scaleX = 1.0;
    
84.     double scaleY = 1.0;
    
85.     double scaleZ = 1.0;
    
86.     double rotation = 0.0;
    
87. 
    
88.     pMSpace->InsertBlock(
    
89.                             vInsertionPoint,
    
90.                             block,
    
91.                             scaleX,
    
92.                             scaleY,
    
93.                             scaleZ,
    
94.                             rotation,
    
95.                             vtMissing,
    
96.                             &pBlkRef
    
97.                         );
    
98. 
    
99.     VariantClear(&vInsertionPoint);
    
100. }
     

#pragma warning( disable : 4278 )<br /> // Makes change to the tlb name based on the AutoCAD version.<br /> // For ex : acax18enu.tlb for AutoCAD 2010/2011 and 2012<br /> //          acax19enu.tlb for AutoCAD 2013<br /> #import "acax19ENU.tlb" no_implementation raw_interfaces_only named_guids<br /> #pragma warning( default : 4278 )<br /> <br /> #include <acadi.h><br /> static void ADSProjectInsertBlock(void)<br /> {<br />     int ret = RTNORM;<br /> <br />     TCHAR drawingFilePath[500];<br />     drawingFilePath[0] = _T('\0');<br />     ret = acedGetString (<br />                             NULL,<br />                             _T("Enter file path : "),<br />                             drawingFilePath<br />                         );<br />     if(ret != RTNORM)<br />         return;<br /> <br />     ads_point insertionPoint;<br />     ret = acedGetPoint(<br />                         NULL,<br />                         _T("\nEnter insertion point: "),<br />                         insertionPoint<br />                        );<br />     if(ret != RTNORM)<br />         return;<br /> <br />     CWinApp *pApp = acedGetAcadWinApp();<br />     HRESULT hRes;<br />     LPDISPATCH pDisp=NULL;<br /> <br />     if(!pApp)<br />         return;<br /> <br />     pDisp=pApp->GetIDispatch(TRUE);<br />     if    (!pDisp)<br />           return;<br /> <br />     CComPtr<AutoCAD::IAcadApplication>  pComApp;<br />     hRes=pDisp->QueryInterface(<br />                                 IID_IAcadApplication,<br />                                 (void**)&pComApp<br />                               );<br />     if (FAILED(hRes))<br />           return;<br /> <br />     CComPtr<AutoCAD::IAcadDocument> pComDoc;<br />     hRes=pComApp->get_ActiveDocument(&pComDoc);<br />     if(FAILED(hRes))<br />         return;<br /> <br />     CComPtr<AutoCAD::IAcadModelSpace> pMSpace = NULL;<br />     pComDoc->get_ModelSpace(&pMSpace);<br /> <br />     _bstr_t block(drawingFilePath);<br />     CComPtr<AutoCAD::IAcadBlockReference> pBlkRef = NULL;<br /> <br />     SAFEARRAYBOUND rgsaBound;<br />     rgsaBound.lLbound = 0L;<br />     rgsaBound.cElements = 3;<br />     SAFEARRAY* pInsertionPoint = NULL;<br />     pInsertionPoint = SafeArrayCreate(VT_R8, 1, &rgsaBound);<br /> <br />     for(long i = 0; i < 3; i++)<br />     {<br />         double value = insertionPoint<i>;<br />         SafeArrayPutElement(<br />                                 pInsertionPoint,<br />                                 &i,<br />                                 &value<br />                             );<br />     }<br /> <br />     VARIANT vInsertionPoint;<br />     VariantInit(&vInsertionPoint);<br />     V_VT(&vInsertionPoint) = VT_ARRAY | VT_R8;<br />     V_ARRAY(&vInsertionPoint) = pInsertionPoint;<br /> <br />     double scaleX = 1.0;<br />     double scaleY = 1.0;<br />     double scaleZ = 1.0;<br />     double rotation = 0.0;<br /> <br />     pMSpace->InsertBlock(<br />                             vInsertionPoint,<br />                             block,<br />                             scaleX,<br />                             scaleY,<br />                             scaleZ,<br />                             rotation,<br />                             vtMissing,<br />                             &pBlkRef<br />                         );<br /> <br />     VariantClear(&vInsertionPoint);<br /> }<br />