每日一码] ARX使用ActiveX 接口查找所有的XREF

admin

2. #include "stdafx.h"
3. #include "acad.h" // generated by MFC ClassWizard
5. // no error checking for code brevity
6. void printXrefBtrs()
7. {
8.     IAcadApplication iApp(acedGetAcadWinApp()->GetIDispatch(TRUE));
9.     IAcadDocument iDoc(iApp.GetActiveDocument());
10.     IAcadBlocks iBlks(iDoc.GetBlocks());
11.     for(long i=0; i<iBlks.GetCount(); i++)
12.     {
13.         采用variant采用t x(i);
14.         IAcadBlock iBlk(iBlks.Item(x));
15.         if(iBlk.GetIsXRef() == TRUE)
16.         {
17.             CString str = iBlk.GetName();
18.             acutPrintf("\nBTR # %d is a Xref with name: %s", i,
19. str);
20.         }
21.     }
22. }

复制代码