模态对话框下读写用户字典，CAD直接崩溃，请教如何解决

革天明

newer 发表于 2016-10-13 13:03

CCreatEnt::Addlayer(_T("xiaodong"));没有问题，

newer

革天明 发表于 2016-10-13 13:06

那就得逐步排查了，你别添加辞典扩展记录，你添加个 TABLESTYLE 到辞典试试。

革天明

大家加把劲，卡在这里了，发现问题是只要读一次字典，然后再写入字典就会出错，或者是写入字典，再读取也出错，也就是说读写只能一次

Highflybird

确保每个地方的指针不为空或者有效，譬如pDict如果为空或者无效的话，pDict->setAt(recName, pXrec, xrecObjId); 之类的语句就可能引起崩溃。
Objectarx编程引起的崩溃问题大多数是指针的问题。
建议用智能指针。

csharp

革天明 发表于 2016-10-14 09:58

1. 
   
2. void CCreateEnt::addNameDict(CString appName,CString recName,CString data)
   
3. {
   
4.         ErrorStatus es;
   
5.         //得到命名对象词典指针
   
6.          
   
7.         AcDbDictionaryPointer pNamedobj(acdbHostApplicationServices()->workingDatabase()->namedObjectsDictionaryId(),AcDb::kForRead);
   
8.   
   
9.         // 检查是否已有关键字为“设计信息”的词典，如没有，则创建
   
10. 
    
11.         AcDbObjectId dictId;
    
12.         if (!pNamedobj->has(appName))
    
13.         {
    
14.                 pNamedobj->upgradeOpen();
    
15.             AcDbDictionary*        pNewDict = new AcDbDictionary();               
    
16.                 es=pNamedobj->setAt(appName, pNewDict, dictId);
    
17.                 pNewDict->close();
    
18.                 if (es!=Acad::eOk)
    
19.                 {                       
    
20.                         return;
    
21.                 }
    
22.         }
    
23.         else
    
24.         {
    
25.                 pNamedobj->getAt(appName,dictId);
    
26.         }
    
27.         AcDbDictionaryPointer pDict(dictId,AcDb::kForRead);
    
28.     AcDbObjectId xrecObjId;
    
29.         if (!pDict->has(recName))
    
30.         {
    
31.                 pDict->upgradeOpen();
    
32.             AcDbXrecord*        pNewXrec = new AcDbXrecord;               
    
33.                 es=pDict->setAt(recName, pNewXrec, xrecObjId);         
    
34.                 pNewXrec->close();
    
35.                 if (es!=Acad::eOk)
    
36.                 {
    
37.                         return;
    
38.                 }
    
39.         }
    
40.         else
    
41.         {
    
42.                 pDict->getAt(recName,xrecObjId);
    
43.         }
    
44. 
    
45.        
    
46.         AcDbObjectPointer<AcDbXrecord> pXrec(xrecObjId,AcDb::kForWrite);
    
47.          
    
48.         struct resbuf *pHead;
    
49.         pHead = acutBuildList(AcDb::kDxfText, data,0);
    
50.         // 为AcDbXrecord对象设置链表
    
51.         pXrec->setFromRbChain(*pHead);
    
52.         acutRelRb(pHead);
    
53.         pXrec->close();                 
    
54. }
    
55. 
    
56. void CCreateEnt::getNameDict(CString appName,CString recName,CString& data)
    
57. {
    
58.         AcDbDictionaryPointer pNamedobj(acdbHostApplicationServices()->workingDatabase()->namedObjectsDictionaryId(),AcDb::kForRead);
    
59.         //得到关键字为"设计信息"的词典       
    
60.     if (!pNamedobj->has(appName))
    
61.     {                 
    
62.                 acutPrintf(_T("\n未找到用户字典！"));
    
63.                 return;
    
64.     }         
    
65.         AcDbObjectId dictId,xrecId;
    
66.         pNamedobj->getAt(appName,dictId);
    
67.         AcDbDictionaryPointer pNod(dictId,AcDb::kForRead);
    
68.         if (!pNod->has(recName))
    
69.         {
    
70.                 acutPrintf(_T("\n未找到指定记录！"));
    
71.                 return;
    
72.         }
    
73.         //得到关键字为"设计者"的AcDbXrecord对象
    
74.         pNod->getAt(recName,xrecId);
    
75.         AcDbObjectPointer<AcDbXrecord> pXrec(xrecId,AcDb::kForRead);
    
76.          
    
77.         struct resbuf *pRbList;
    
78.         pXrec->rbChain(&pRbList);
    
79.         pXrec->close();
    
80. 
    
81.         if(pRbList!=NULL)
    
82.         {
    
83.                 data=pRbList->resval.rstring;
    
84.         }
    
85.         else
    
86.         {
    
87.                 acutPrintf(_T("\n未找到用户字典！"));
    
88.         }
    
89.         acutRelRb(pRbList);
    
90. }
    

复制代码

LoveArx

Highflybird 发表于 2016-10-17 10:16

智能指针解决的是忘记关闭对象的问题，不是解决编程习惯不好，不判断返回值进行操作造成的错误。

革天明

csharp 发表于 2016-10-20 15:32

• if (!pNamedobj->has(appName))
•     {
•                 pNamedobj->close();    
•                 acutPrintf(_T("\n未找到用户字典！"));
•                 return;
•     }
  

重点为return前的关闭

LoveArx

革天明 发表于 2016-10-20 19:20

楼主的例子很好，说明一个事，对象打开后，最近的不需要的地方就关闭它。一个对象要打开前写操作，另外的对象一定要关闭，哪怕是父容器。这个例子用智能指针也不行，因为在生存期内，智能指针不会析构。

LoveArx

革天明 发表于 2016-10-20 19:20

我看错了，这个地方可以用智能指针，因为return前。

没仔细看楼主的代码，楼主，你要操作的辞典没有吗？ 什么情况下执行到这个地方？

革天明

LoveArx 发表于 2016-10-20 19:28

//向图形数据库添加一个有名字典并添加记录
void CCreatEnt::YTMaddNameDict(CString appName,CString recName,CString data)
{
        // 锁定当前文档
        //acDocManager->lockDocument(acDocManager->curDocument(), AcAp::kWrite, NULL, NULL, true);
        //得到命名对象词典指针
        AcDbDictionary *pNamedobj, *pDict;
        Acad::ErrorStatus es=acdbHostApplicationServices()->workingDatabase()->getNamedObjectsDictionary(pNamedobj, AcDb::kForWrite);
        if(es!=Acad::eOk)
        {
                //文档解锁
                acDocManager->unlockDocument(acDocManager->curDocument());
        }
        // 检查是否已有关键字为“设计信息”的词典，如没有，则创建
        if (pNamedobj->getAt(appName, (AcDbObject*&) pDict,AcDb::kForWrite) == Acad::eKeyNotFound)
        {
                pDict = new AcDbDictionary;
                AcDbObjectId DictId;
                pNamedobj->setAt(appName, pDict, DictId);
        }
        if(pNamedobj!=NULL)
        {
                pNamedobj->close();
        }       
        //创建AcDbXrecord对象，并添加到扩展词典
        AcDbXrecord *pXrec = new AcDbXrecord;
        AcDbObjectId xrecObjId;
        pDict->setAt(recName, pXrec, xrecObjId);
        if(pDict!=NULL)
        {
                pDict->close();
        }       
        //为AcDbXrecord对象创建resbuf链表
        struct resbuf *pHead;
        pHead = acutBuildList(AcDb::kDxfText,data,RTNONE);
        // 为AcDbXrecord对象设置链表
        pXrec->setFromRbChain(*pHead);
        acutRelRb(pHead);
        if(pXrec!=NULL)
        {
                pXrec->close();
        }
        // 运行完解锁文档
        //acDocManager->unlockDocument(acDocManager->curDocument());
}
//从图形数据库获取一个有名字典并获取记录
void CCreatEnt::YTMgetNameDict(CString appName,CString recName,CString& data)
{
        AcDbDictionary *pNamedobj;
        Acad::ErrorStatus es=acdbHostApplicationServices()->workingDatabase()->getNamedObjectsDictionary(pNamedobj, AcDb::kForRead);
        if(es!=Acad::eOk)
        {
                //文档解锁
                acDocManager->unlockDocument(acDocManager->curDocument());
        }
        //得到关键字为"设计信息"的词典
        AcDbDictionary *pDict;
        if(pNamedobj->getAt(appName, (AcDbObject*&)pDict,AcDb::kForRead)== Acad::eKeyNotFound)
        {
                pNamedobj->close();
                acutPrintf(_T("\n未找到用户字典！"));
                return;
        }
        if(pNamedobj!=NULL)
        {
                pNamedobj->close();
        }       
        //得到关键字为"设计者"的AcDbXrecord对象
        AcDbXrecord *pXrec;
        if(pDict->getAt(recName, (AcDbObject*&) pXrec,AcDb::kForRead)== Acad::eKeyNotFound)
        {
                pDict->close();
                acutPrintf(_T("\n未找到指定记录！"));
                return;
        }
        if(pDict!=NULL)
        {
                pDict->close();
        }       
        struct resbuf *pRbList;
        pXrec->rbChain(&pRbList);
        if(pXrec!=NULL)
        {
                pXrec->close();
        }       
        //返回的结果缓存的处理参考示例工程
        //vector<CString> secret;
        //acutPrintf(_T("\n%s"),pRbList->resval.rstring);
        //vecStr.push_back(pRbList->resval.rstring);
        if(pRbList!=NULL)
        {
                data=pRbList->resval.rstring;
        }
        else
        {
                acutPrintf(_T("\n未找到用户字典！"));
        }
        acutRelRb(pRbList);
}

以上代码为我最终使用的代码，没有用智能指针，当前代码未再出现崩溃的情况，多谢@Highflybird的悉心指点！
程序主要的思路是打开一个dwg时，检查有无数据（保存在命名字典中），若有的话读取此数据，然后……当程序结束时，无论数据是否修改，还保存到对应的字典项中（新建或覆盖）