获取表格样式

AcDbObjectId GetTableStyleObjectId(CString strTableStyleName,AcDbDatabase* pDb=acdbHostApplicationServices()->workingDatabase())
{
AcDbTableStyle *pTS = NULL;
AcDbDictionary *pNamedObj = NULL, *pNameList = NULL;
AcDbObjectId ObjectId;
Acad::ErrorStatus es;

es = pDb->getNamedObjectsDictionary(pNamedObj, AcDb::kForRead);
es = pNamedObj->getAt(_T(“acad_tablestyle”),(AcDbObject*&)pNameList, AcDb::kForRead);
if (pNamedObj)
pNamedObj->close();
es = pNameList->getAt(strTableStyleName, ObjectId);
if (pNameList)
pNameList->close();
return ObjectId;
}