[每日一码] 使用ARX读取尺寸的文本内容

admin

1. AcDbEntity *pEnt;
2.   AcDbObjectId id;
3.   AcGePoint3d ptPick;
4.   ads采用name eName;
5.   if (acedEntSel (采用T("Select a dimension: ") , eName, asDblArray (ptPick)) != RTNORM )
6.    return;
7.   acdbGetObjectId (id, eName);
8.   acdbOpenAcDbEntity (pEnt, id, AcDb::kForRead);
9.   //----- Get the id of the block table record which owns the text entity
10.   AcDbDimension *pDim =AcDbDimension::cast (pEnt);
11.   if (pDim == NULL)
12.   {
13.    pEnt->close ();
14.    return;
15.   }
16.   id =pDim->dimBlockId ();
17.   pDim->close ();
18.   AcDbBlockTableRecord *pr;
19.   acdbOpenAcDbObject ((AcDbObject *&) pr, id, AcDb::kForRead);
20.   //----- Iterating the block table record
21.   AcDbBlockTableRecordIterator *pi;
22.   pr->newIterator (pi);
23.   while (!pi->done ())
24.   {
25.    pi->getEntity (pEnt, AcDb::kForRead);
26.    if (pEnt->isKindOf (AcDbMText::desc ()))
27.    {
28.     AcDbMText *pt = (AcDbMText *) pEnt;
29.     ACHAR *s = pt->contents ();
30.     acutPrintf (s);
31.     delete s;
32.    }
33.    pEnt->close();
34.    pi->step();
35.   }
36.   pr->close();

复制代码