Adding Attribute To A Block Definition

newer

问题：

How can I add attribute to a block definition using ActiveX Automation API?

解答：
The code below shows how to add an Attribute to a block definition.

The following code creates block by name "test_block" and adds an attribute to it.

1. //use MFC
   
2. 
   
3. #import "acad.tlb" no_namespace
   
4. void fAddAttribute()
   
5. {
   
6. try
   
7. {
   
8. //first create a block and then add one attribute to it
   
9. //adding a block by name test_block
   
10. IAcadApplicationPtr pAcadApp = acedGetAcadWinApp()->GetIDispatch(TRUE);
    
11. IAcadDocumentPtr pActiveDoc = pAcadApp->ActiveDocument;
    
12. IAcadBlockPtr pBlock = NULL;
    
13. char *pBlkName;
    
14. pBlkName = "test_block";
    
15. VARIANT mvInsPt;
    
16. SAFEARRAYBOUND mSAB;
    
17. mSAB.lLbound = 0;
    
18. mSAB.cElements = 3;
    
19. mvInsPt.vt = VT_ARRAY | VT_R8;
    
20. mvInsPt.parray = SafeArrayCreate(VT_R8,1,&mSAB);
    
21. //fill the array of doubles for the insertion point
    
22. double mDbl[3];
    
23. mDbl[0] = 0.0;mDbl[1] = 0.0;mDbl[2] = 0.0;
    
24. SafeArrayPutElement(mvInsPt.parray,0,(void *)&mDbl[0]);
    
25. SafeArrayPutElement(mvInsPt.parray,0,(void *)&mDbl[1]);
    
26. SafeArrayPutElement(mvInsPt.parray,0,(void *)&mDbl[2]);
    
27. pBlock = pActiveDoc->Blocks->Add(mvInsPt,_bstr_t(pBlkName));
    
28. //block added
    
29. //add an Attribute to the block
    
30. IAcadAttributePtr pAttDef;
    
31. pAttDef = pBlock->AddAttribute(1.0, (AcAttributeMode)0 ,_bstr_t("Type the employee name"),mvInsPt,_bstr_t("empname"),_bstr_t(""));
    
32. //attribute added
    
33. }
    
34. catch(_com_error &es)
    
35. {
    
36. acutPrintf(""nError : %s", es.ErrorMessage());
    
37. }
    
38. }
    

//use MFC<br /> <br /> #import "acad.tlb" no_namespace<br /> void fAddAttribute()<br /> {<br /> try<br /> {<br /> //first create a block and then add one attribute to it<br /> //adding a block by name test_block<br /> IAcadApplicationPtr pAcadApp = acedGetAcadWinApp()->GetIDispatch(TRUE);<br /> IAcadDocumentPtr pActiveDoc = pAcadApp->ActiveDocument;<br /> IAcadBlockPtr pBlock = NULL;<br /> char *pBlkName;<br /> pBlkName = "test_block";<br /> VARIANT mvInsPt;<br /> SAFEARRAYBOUND mSAB;<br /> mSAB.lLbound = 0;<br /> mSAB.cElements = 3;<br /> mvInsPt.vt = VT_ARRAY | VT_R8;<br /> mvInsPt.parray = SafeArrayCreate(VT_R8,1,&mSAB);<br /> //fill the array of doubles for the insertion point<br /> double mDbl[3];<br /> mDbl[0] = 0.0;mDbl[1] = 0.0;mDbl[2] = 0.0;<br /> SafeArrayPutElement(mvInsPt.parray,0,(void *)&mDbl[0]);<br /> SafeArrayPutElement(mvInsPt.parray,0,(void *)&mDbl[1]);<br /> SafeArrayPutElement(mvInsPt.parray,0,(void *)&mDbl[2]);<br /> pBlock = pActiveDoc->Blocks->Add(mvInsPt,_bstr_t(pBlkName));<br /> //block added<br /> //add an Attribute to the block<br /> IAcadAttributePtr pAttDef;<br /> pAttDef = pBlock->AddAttribute(1.0, (AcAttributeMode)0 ,_bstr_t("Type the employee name"),mvInsPt,_bstr_t("empname"),_bstr_t(""));<br /> //attribute added<br /> }<br /> catch(_com_error &es)<br /> {<br /> acutPrintf(""nError : %s", es.ErrorMessage());<br /> }<br /> }<br />

附件是完整工程代码：
70209.zip (173.7 KB, 下载次数: 0, 售价: 50 D豆)

2021-1-11 20:43 上传

点击文件名下载附件
阅读权限: 30