Drag'n'Drop ошибка (возможно версия билдера)

 void __fastcall WMDROPFILES(TMessage&);// Обработчик перетаскивания файлов
 
    BEGIN_MESSAGE_MAP
      MESSAGE_HANDLER(WM_DROPFILES,TMessage,WMDROPFILES);    // Сообщение о перетаскивании файлов
    END_MESSAGE_MAP(TForm);

// h файл - определение функции
class TForm {
         void __fastcall WMDROPFILES(TMessage&);
}

// cpp файл - реализация
void __fastcall TForm::WMDROPFILES(TMessage&) {
 
}

TRichEdit *RichEdit1;
        void __fastcall FormCreate(TObject *Sender);
private:
void __fastcall WmDropFiles(TWMDropFiles& Message);
void __fastcall ReadFile(AnsiString FileName);  // User declarations
public:     // User declarations
        __fastcall TForm1(TComponent* Owner);
BEGIN_MESSAGE_MAP
   MESSAGE_HANDLER(WM_DROPFILES, TWMDropFiles, WmDropFiles)
END_MESSAGE_MAP(TForm);
}

class TForm {
           void __fastcall WMDROPFILES(TMessage& AMessage) {
                  // здесь описана реализация функции в теле класса
           }
}

class TForm {
           // объявление функции, реализация будет позже
           void __fastcall WMDROPFILES(TMessage& AMessage) ;
}
 
void __fastcall TForm::WMDROPFILES(TMessage& AMessage) {
                  // здесь описана реализация функции за пределами класса
}

private:
    void __fastcall CreateMDIChild(const String Name,bool img);
    void __fastcall WmDropFiles(TWMDropFiles& Message);
    void __fastcall ReadFile(AnsiString FileName);
public:
    virtual __fastcall TMainForm(TComponent *Owner);
    BEGIN_MESSAGE_MAP
        MESSAGE_HANDLER(WM_DROPFILES,TWMDropFiles,WmDropFiles)
    END_MESSAGE_MAP(TForm);

private: // User declarations
    void __fastcall CreateMDIChild(const String Name, bool img);
    void __fastcall WmDropFiles(TWMDropFiles& Message);
    void __fastcall ReadFile(AnsiString FileName);
 
public: // User declarations
 
        typedef struct {
        float fCenter;
        float fBandwidth;
        float fGain;
 
    }
 
    BASS_DX8_PARAMEQ;
 
    __fastcall TForm2(TComponent* Owner);
    BEGIN_MESSAGE_MAP
        MESSAGE_HANDLER(WM_DROPFILES,TWMDropFiles,WmDropFiles)
    END_MESSAGE_MAP(TForm);

void __fastcall TForm2::WMDROPFILES(TMessage &Msg)
{
char chFileName[256];
int Count;
Count = DragQueryFile((void*) Msg.WParam, 0xFFFFFFFF,chFileName,sizeof(chFileName)); // число перетащенных файлов
 
for (int i=0;i<Count;i++)//цикл по файлам
  {
   DragQueryFile((void*)Msg.WParam,i,chFileName,sizeof(chFileName)); // запрос имени файла
   ListBox1->Items->Add(chFileName);
  // Чито-То ИчО
  }
DragFinish((void*)Msg.WParam); // завершение перетаскивания
}

    wchar_t chFileName[256];
int Count;
HDROP drop=(HDROP)Msg.Drop;
Count = DragQueryFile(drop, 0xFFFFFFFF,chFileName,sizeof(chFileName)); // число перетащенных файлов
 
for (int i=0;i<Count;i++)//цикл по файлам
  {
   DragQueryFile(drop,i,chFileName,sizeof(chFileName)); // запрос имени файла
   ListBox1->Items->Add(chFileName);
  // Чито-То ИчО
  }
DragFinish(drop);