Delphi代码用BCB重写后出现的这个错误怎么回事?

  [C++ Fatal Error] MakeObjectInstance.cpp(91): F1004 Internal compiler error at 0xd43c33 with base 0xce0000
前两日看了一篇关于VCL窗口注册的文,觉得很好,可惜是于是决定自己Delphi的源码,没学过Delphi,于是自己抱着学习的态度将那段Delphi代码用BCB重写了一遍,于是就出现了这个错误.大家帮忙看看怎么解决.
源码:

#include <windows.h>
//#include <VCL.h>
//------------------------------------------------------------------------------
#define DEFCALLBACKMETHOD(Method,parameters)  parameters
#define HOKMETHODTOCALLBACKPROC(Method)  MakeCallBackMethod(Method)
//------------------------------------------------------------------------------
typedef void __fastcall (__closure *TObjCallBackMethod);//(HWND hwnd,UINT uMsg,UINT idEvent,DWORD dwTime);
//typedef TObjInst _TObjInst;
//typedef TObjInst _TInstBlock ;
void _stdcall StdProc(void);
//------------------------------------------------------------------------------
typedef struct _TObjInst  //对象方法指针连
{
  char Code;    //Call指令存放点
  int  Offset;  //StdProc偏移量
  union
{
struct
    {
              void* Obj;    //对象的this指针
      void* Proc; //函数指针或下一链表指针
              &