[每日一码] 如何把其他对象的OBJECTID保存到扩展词典的扩展记录中

admin

1. int AddSoftpointerIntoXdict(AcDbObjectId id1,AcDbObjectId id2)
2. {
3. Acad::ErrorStatus retStat;
4. AcDbXrecord * pXrec=new AcDbXrecord;
5. AcDbDictionary *pDict=NULL;
6. AcDbObjectId dictid,xrecid;
7. AcDbSoftPointerId SP(id2);
8. AcDbObject * pobj;
9. struct resbuf * head=NULL;
10. ads采用name adsName;
12. if((retStat=acdbOpenObject(pobj,id1,AcDb::kForWrite))!=
13.   Acad::eOk)
14.   return 0;
16. pobj->createExtensionDictionary();
17. dictid=pobj->extensionDictionary();
18. pobj->close();
20. acdbOpenObject(pDict,dictid,AcDb::kForWrite);
22. pDict->setAt(采用T("TEST"),pXrec,xrecid);
23. pDict->close();
25. acdbGetAdsName(adsName, id2);
26. head=acutBuildList(AcDb::kDxfSoftPointerId, adsName, 0);
28. pXrec->setFromRbChain(* head);
29. pXrec->close();
30. acutRelRb(head);
32. return 1;
33. }
36. void AddInfo()
37. {
38. int rt;
39. ads采用name en1,en2;
40. ads采用point pickpt;
41. AcDbObjectId id1, id2;
42. Acad::ErrorStatus retStat;
44. rt=acedEntSel(
45.   采用T("\nSelect an entity to reference the following entity: "),
46.   en1,pickpt);
47. if(rt!=RTNORM)
48.   return;
49. retStat=acdbGetObjectId(id1,en1);
50. assert(retStat==Acad::eOk);
52. rt=acedEntSel(采用T("\nSelect an entity to be referenced: "),
53.   en2,pickpt);
54. if(rt!=RTNORM)
55.   return;
56. retStat=acdbGetObjectId(id2,en2);
57. assert(retStat==Acad::eOk);
59. acutPrintf(采用T("\nid2=%ld"),id2);
60. rt=AddSoftpointerIntoXdict(id1,id2);
61. if(rt==0)
62.   return;
63. }
66. [it618postdisplay>0]
67. 普通浏览复制代码
68. void GetInfo()
69. {
70. int rt;
71. ads采用name en1;
72. ads采用point pickpt;
73. AcDbObjectId id1;
74. Acad::ErrorStatus retStat;
75. AcDbXrecord * pXrec=NULL;
76. AcDbDictionary * pDict;
77. AcDbObjectId dictid,xrecid;
78. struct resbuf * rb;
79. AcDbObjectId tmpId=NULL;
81. rt=acedEntSel(
82.   采用T("\nSelect an entity attached extension dictionary:"),
83.   en1,pickpt);
84. if(rt!=RTNORM)
85.   return;
87. retStat=acdbGetObjectId(id1,en1);
88. assert(retStat==Acad::eOk);
89. AcDbObject * pobj;
90. retStat=acdbOpenObject(pobj,id1,AcDb::kForRead);
91. assert(retStat==Acad::eOk);
93. dictid=pobj->extensionDictionary();
94. if(dictid==AcDbObjectId::kNull)
95. {
96.   acutPrintf(采用T("\nId is NULL."));
97.   pobj->close();
98.   return;
99. }
100. pobj->close();
102. acdbOpenObject(pDict,dictid,AcDb::kForRead);
103. pDict->getAt(采用T("TEST"),(AcDbObject * &)pXrec,AcDb::kForRead);
104. pDict->close();
105. pXrec->rbChain(&rb);
106. pXrec->close();
107. if(rb==NULL)
108.   acutPrintf(采用T("\nNull result buffer."));
109. if (rb->restype == AcDb::kDxfSoftPointerId)
110. {
111.   acdbGetObjectId(tmpId, rb->resval.rlname);
112.   acutPrintf(采用T("\nReferenced Id=%ld"),tmpId);
113. }
114. acutRelRb(rb);
115. }

复制代码