[ARX函数]：帮忙了！！！

chenji

编译通过（为什么运行重视出现对话框‘读写错误“
谢指点）dys-cj@home.ncidi.com...
原程序如下：

1. [font=courier new]
   
2. CString fname=getfilename.file1;
   
3.         CString addintional="d:\";
   
4.         fname=addintional+fname+".dwg";
   
5.         //additional prase
   
6.         //
   
7. 
   
8.         acutPrintf("fname.....%s\n",fname);
   
9.         //end.cj
   
10. 
    
11.         AcDbDatabase* pDb;
    
12.         AcDbObjectId transId;
    
13.         pDb = new AcDbDatabase(Adesk::kFalse);
    
14.         pDb->readDwgFile(fname);
    
15.     if (pDb->readDwgFile(fname) != Acad::eOk)
    
16.         {
    
17.         acutPrintf("\nSorry, that draing is probably already open.\n");
    
18.         return;
    
19.     }
    
20.     // Get the Block Table and then the model space record.
    
21.     //
    
22.     AcDbBlockTable *pBlockTable;
    
23.     pDb->getSymbolTable(pBlockTable, AcDb::kForRead);
    
24.     AcDbBlockTableRecord *pOtherMsBtr;
    
25.     pBlockTable->getAt(ACDB_MODEL_SPACE, pOtherMsBtr, AcDb::kForRead);
    
26.     pBlockTable->close();
    
27.     // Create an iterator.
    
28.     //
    
29.     AcDbBlockTableRecordIterator *pIter;
    
30.     pOtherMsBtr->newIterator(pIter);
    
31.     // Set up an object ID array.
    
32.     //
    
33.     AcDbObjectIdArray objIdArray;
    
34.     // Iterate over the model space BTR. Look specifically
    
35.     // for lines and append their object ID to the array.
    
36.     //
    
37.     for (pIter->start(); !pIter->done(); pIter->step())
    
38.         {
    
39.         AcDbEntity *pEntity;//AcDbText *pEntitytext;
    
40.         pIter->getEntity(pEntity, AcDb::kForRead);
    
41.         // Look for only AcDbLine objects and add them to the
    
42.         // object ID array.
    
43.         //
    
44.         if (pEntity->isKindOf(AcDbText::desc()))
    
45.                 {
    
46.             objIdArray.append(pEntity->objectId());
    
47.         }
    
48.         //        pEntitytext->close();
    
49.                 acutPrintf("111d\n");
    
50.         pEntity->close();
    
51.     }
    
52.     delete pIter;
    
53.     pOtherMsBtr->close();
    
54.     if (objIdArray.isEmpty())
    
55.         {
    
56.         //acutPrintf("\nYou must pick a drawing file that contains lines.");
    
57.         return;
    
58.     }
    
59.     // Now get the current database and the object ID for the
    
60.     // current database's model space BTR.
    
61.     //
    
62.     AcDbBlockTable *pThisBlockTable;
    
63.     acdbHostApplicationServices()->workingDatabase()
    
64.         ->getSymbolTable(pThisBlockTable, AcDb::kForRead);
    
65.     AcDbBlockTableRecord *pThisMsBtr;
    
66.     pThisBlockTable->getAt(ACDB_MODEL_SPACE, pThisMsBtr, AcDb::kForWrite);
    
67.     pThisBlockTable->close();
    
68.     AcDbObjectId id = pThisMsBtr->objectId();
    
69.     pThisMsBtr->close();
    
70.     // Create the long transaction. This will check all the entities
    
71.     // out of the external database.
    
72.     //
    
73.     AcDbIdMapping errorMap;
    
74.     acapLongTransactionManagerPtr()->checkOut(transId, objIdArray, id, errorMap);
    
75. 
    
76.     // Now modify the color of these entities.
    
77.     //
    
78.     AcDbObject* pObj;
    
79.         //w .by.cj
    
80. 
    
81.         //w.by.cj
    
82. 
    
83.     if (acdbOpenObject(pObj, transId, AcDb::kForRead) == Acad::eOk)
    
84.         {
    
85.         AcDbLongTransaction* pLongTrans = AcDbLongTransaction::cast(pObj);
    
86.         if (pLongTrans != NULL)
    
87.                 {
    
88.             // Get a work set iterator.
    
89.             //
    
90.             AcDbLongTransWorkSetIterator* pWorkSetIter;
    
91.             pLongTrans->newWorkSetIterator(pWorkSetIter);
    
92. 
    
93.                         //add///cj
    
94.                        
    
95.                         for (pWorkSetIter->start(); !pWorkSetIter->done(); pWorkSetIter->step())
    
96.                         {
    
97.                 AcDbText *pEntity;
    
98.                 acdbOpenObject(pEntity, pWorkSetIter->objectId(), AcDb::kForWrite);
    
99.                 //假如语句       
    
100.         if(pEntity->textString()=="yyy"                               
     
101.         {
     
102. pEntity->setTextString("xxx");
     
103.                                 }
     
104.                     pEntity->close();
     
105.             }
     
106.             delete pWorkSetIter;
     
107.         }
     
108.         pObj->close();
     
109.         }
     
110.      acapLongTransactionManagerPtr()->checkIn(transId, errorMap);
     
111.         pDb->saveAs(fname);
     
112.         delete pDb;
     
113.         pDb = NULL;
     
114.         acutPrintf("ddd,end....%s",fname);
     
115. //        acad_free(fname);
     
116. }
     
117. [/font]
     

复制代码

XDSoft

最初由 chenji 发布
[B]编译通过（为什么运行重视出现对话框‘读写错误“
谢指点）dys-cj@home.ncidi.com...
原程序如下：
CString fname=getfilename.file1;
        CString addintional="d:\\";
        fname=addintional+fname+".dwg";
        //add... [/B]

你把提示你出错的信息贴上来，通过它可以方便查找。

你用了很多PRINT语句，告诉下，在哪行的PRINT显示后，出现提示错误的。

并说明下，这个程序你要做什么？那个功能完成后出现错误的，提供的信息越多，越方便大家为你看。

chenji

昨天，我的问题已经自己解决了。。。。