AcDbLayerTablePointer pLT(acdbCurDwg(), AcDb::kForRead);
AcDbObjectId id;
if (pLT->getAt(L"0",id) == Acad::eOk) {
AcRxClass *pEtalonClass = AcDbLayerTableRecord::desc();
const ACHAR *pEtalonClassName = pEtalonClass->name();
AcRxClass *pClass = id.objectClass();
const ACHAR *pClassName = pClass->name();
AcRxClass *pClassRef = pClass->isA();
const ACHAR *pClassRefName = pClassRef->name();
acutPrintf(L"\nEtalonClass=%s, Class=%s, ClassRef=%s",
pEtalonClassName, pClassName,pClassRefName);
bool bIs = (pClass == pEtalonClass);
acutPrintf(L"\n(pClass == pEtalonClass)=%s", bIs ? L"Yes": L"No");
bool bIsKindOf = pClass->isKindOf(pEtalonClass);
acutPrintf(L"\npClass->isKindOf(pEtalonClass) = %s", bIsKindOf ? L"Yes": L"No");
bool bIsDerived = pClass->isDerivedFrom(pEtalonClass);
acutPrintf(L"\npClass->isDerivedFrom(pEtalonClass) = %s", bIsDerived ? L"Yes": L"No");
}