Summary Info

Acad::ErrorStatus chAuthor(const TCHAR* authorName)
{
   Acad::ErrorStatus es;
   AcDbDatabaseSummaryInfo* sumInfo;
   AcDbDatabase *pDB;
   pDB=acdbHostApplicationServices()->workingDatabase();
   if ( (es=acdbGetSummaryInfo(pDB,sumInfo)) == Acad::eOk )
   {
      if ( (es=sumInfo->setAuthor(authorName)) == Acad::eOk )
      {
         acutPrintf(_T("\nАвтор изменен на %s"),authorName);
      }
   }
   return (es);
}