VC 之余RTTI

dhbo

于 2006-08-06 22:15:00 发布

阅读量862

点赞数

分类专栏：网络技术类文章标签： class pascal null attributes import struct

本文链接：https://blog.csdn.net/dhbo/article/details/1029210

版权

网络技术类专栏收录该内容

4 篇文章 0 订阅

订阅专栏

有些东西能够农明白所以然，有些不能弄明白（比如：原子弹是什么蛋？）；我要做的就是把能弄明白的弄明白。别让明白的也不明白，不明白的更不明白。

#define DECLARE_DYNAMIC(class_name) /
public: /
static const AFX_DATA CRuntimeClass class##class_name; /
virtual CRuntimeClass* GetRuntimeClass() const; /

#define AFX_DATA AFX_CORE_DATA

#ifndef AFX_CORE_DATA
#define AFX_CORE_DATA AFX_DATA_IMPORT
#define AFX_CORE_DATADEF
#endif

#ifndef AFX_DATA_IMPORT
#define AFX_DATA_IMPORT __declspec(dllimport)
#endif

#if defined(_AFXEXT) && !defined(_AFXDLL)
#define _AFXDLL
#endif

// 原来只是多了个函数

define IMPLEMENT_DYNAMIC(class_name, base_class_name) /
IMPLEMENT_RUNTIMECLASS(class_name, base_class_name, 0xFFFF, NULL)

#ifdef _AFXDLL
#define IMPLEMENT_RUNTIMECLASS(class_name, base_class_name, wSchema, pfnNew) /
CRuntimeClass* PASCAL class_name::_GetBaseClass() /
  { return RUNTIME_CLASS(base_class_name); } /
AFX_COMDAT const AFX_DATADEF CRuntimeClass class_name::class##class_name = { /
  #class_name, sizeof(class class_name), wSchema, pfnNew, /
   &class_name::_GetBaseClass, NULL }; /
CRuntimeClass* class_name::GetRuntimeClass() const /
  { return RUNTIME_CLASS(class_name); } /

#define _IMPLEMENT_RUNTIMECLASS(class_name, base_class_name, wSchema, pfnNew) /
CRuntimeClass* PASCAL class_name::_GetBaseClass() /
  { return RUNTIME_CLASS(base_class_name); } /
AFX_COMDAT AFX_DATADEF CRuntimeClass class_name::class##class_name = { /
  #class_name, sizeof(class class_name), wSchema, pfnNew, /
   &class_name::_GetBaseClass, NULL }; /
CRuntimeClass* class_name::GetRuntimeClass() const /
  { return RUNTIME_CLASS(class_name); } /

#else
#define IMPLEMENT_RUNTIMECLASS(class_name, base_class_name, wSchema, pfnNew) /
AFX_COMDAT const AFX_DATADEF CRuntimeClass class_name::class##class_name = { /
  #class_name, sizeof(class class_name), wSchema, pfnNew, /
   RUNTIME_CLASS(base_class_name), NULL }; /
CRuntimeClass* class_name::GetRuntimeClass() const /
  { return RUNTIME_CLASS(class_name); } /

#define _IMPLEMENT_RUNTIMECLASS(class_name, base_class_name, wSchema, pfnNew) /
AFX_DATADEF CRuntimeClass class_name::class##class_name = { /
  #class_name, sizeof(class class_name), wSchema, pfnNew, /
   RUNTIME_CLASS(base_class_name), NULL }; /
CRuntimeClass* class_name::GetRuntimeClass() const /
  { return RUNTIME_CLASS(class_name); } /

#endif

       #define AFX_COMDAT
       #define AFX_DATADEF
       #define AFX_DATA AFX_CORE_DATA

/
// Basic object model

struct CRuntimeClass
{
// Attributes
LPCSTR m_lpszClassName;
int m_nObjectSize;
UINT m_wSchema; // schema number of the loaded class
CObject* (PASCAL* m_pfnCreateObject)(); // NULL => abstract class
#ifdef _AFXDLL
CRuntimeClass* (PASCAL* m_pfnGetBaseClass)();
#else
CRuntimeClass* m_pBaseClass;
#endif

// Operations
CObject* CreateObject();
BOOL IsDerivedFrom(const CRuntimeClass* pBaseClass) const;

// Implementation
void Store(CArchive& ar) const;
static CRuntimeClass* PASCAL Load(CArchive& ar, UINT* pwSchemaNum);

// CRuntimeClass objects linked together in simple list
CRuntimeClass* m_pNextClass; // linked list of registered classes
};

#define RUNTIME_CLASS(class_name) ((CRuntimeClass*)(&class_name::class##class_name))

在候捷的深入浅出MFC 中还有：

struct AFX_CLASSINIT
{ AFX_CLASSINIT(CRuntimeClass* pNewClass); };

这个暂时没有弄明白，在VC 中翻原代码没有翻到，我会继续查的

总之我的感觉，这是在给加了这个宏的代码中加入了一个静态成员函数，而CRuntimeClass 这个结构的建立就是一个有表头指针的单链表，方便的实现了RTTI

------------------------------------我是分隔线------------------------------------------------------------------

活着时要尽量开心,因为你会死很久（盗用他人签名）

石头

2006/8/6