Написание плагина на С++ для Делфи-приложения

[Demitreus]

Хочу на BCB 2007 сделать плагин для "All My Movies", которая сделана на Делфи и список API функций, соответственно объявлен на паскале.

Создаю dll проект в BCB 2007, пишу простой примерчик вызова формы - работает. Но вот дальше разработка плагина застопорилась.

Мой код плагина (оставил только необходимую часть для демонстрации)

#define DLL_SPEC __declspec(dllexport)

extern "C"
{
   //Это необходимый список импортируемых функций через которые происходит взаимодействие с плагином
   int DLL_SPEC __stdcall GetVersion4();
   char* DLL_SPEC __stdcall GetName4();
   void DLL_SPEC __stdcall AMM_PluginStart4();
   void DLL_SPEC __stdcall Init4(int Owner);
}

typedef int __stdcall (*iGetPChar)(char * &s);

int OwnerApp;

int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void* lpReserved)
{
    //OwnerApp = 0;
    return 1;
}

void __stdcall Init4(int Owner)
{
    //OwnerApp = 3;
    OwnerApp = Owner;
}

void __stdcall AMM_PluginStart4()
{
    TFirstForm *frm = new TFirstForm(Application);
    frm->ShowModal();
    delete frm;
}

__fastcall TFirstForm::TFirstForm(TComponent* Owner)
{
    char *s = new char[500];
    iGetPChar fun = (iGetPChar)GetProcAddress((HMODULE)OwnerApp, "GetLocalPath");
    int i=0;
    if(fun){
        i = fun(s);
    }
    delete[] s;
}

При вызове Init4 в плагин должен передоваться хандел Owner, с помощью которого я могу обращаться к процессу приложения. Так вот, похоже, что Owner не передаётся или передаётся с ошибкой. Какието проблеммы с передачей параметров, Думал, может не __stdcall, а __cdecl или __fastcall? Уже перепробывал все эти типы вызовов - результат один - указатель "fun" равен нулю! Что может быть?