[求助]创建多个图层的问题

ship120

AcDbObjectId CCreateEnt::CreatLayer (char layername[100],int nNewColor,int Weight,char linetype[50])
{
// 获得当前图形的层表
AcDbLayerTable *pLayerTbl;
acdbHostApplicationServices()->workingDatabase()
  ->getLayerTable(pLayerTbl, AcDb::kForWrite);

// 创建新的层表记录
AcDbObjectId layerTblRcdId;
AcDbLayerTableRecord *pLayerTblRcd;
pLayerTblRcd = new AcDbLayerTableRecord();
pLayerTblRcd->setName(layername);
AcCmColor color;
color.setColorIndex(nNewColor);
pLayerTblRcd->setColor(color);
AcDb::ineWeight lineWeight =(AcDb::ineWeight)Weight;
pLayerTblRcd->setLineWeight(lineWeight);
AcDbLinetypeTable *pLinetypeTbl;
acdbHostApplicationServices()->workingDatabase()
  ->getLinetypeTable(pLinetypeTbl, AcDb::kForWrite);
AcDbObjectId linetypeId;
pLinetypeTbl->getAt(linetype, linetypeId);
pLayerTblRcd->setLinetypeObjectId(linetypeId);

// 将新建的层表记录添加到层表中

pLayerTbl->add(layerTblRcdId, pLayerTblRcd);
pLayerTbl->close();
pLayerTblRcd->close();
return layerTblRcdId;
}


这是 我 编写的 创建图层的 函数，我在调用时如果调用一次 运行可以成功，但当调用2次 或多次的时候 CAD就运行错误，请 高手给解决一下！  谢谢了！
以下我是的调用过程，在下初学者，请多多指教！
  char name2[]="02";
  char name3[]="03";
  char linetype1[]="CENTER";
  char linetype2[]="DASHED";
  char linetype3[]="Continuous";
CCreateEnt::CreatLayer(name1,1,0,linetype1);
  CCreateEnt::CreatLayer(name2,50,0,linetype2);
  CCreateEnt::CreatLayer(name3,100,30,linetype3);

ship120

补充：  设置线宽那句少了一个 l 是我刚才输入时不小心弄的，我程序里不少l

luowy

不想再调试了

出错的提示呢？

ship120

啊 问题已经解决了   是 没有关闭 线型表.... 

谢谢！

elsa0918

这个有点高深，没用过这个。以后再看
！