Не работает простая функция из DLL библиотеки

#pragma argsused
int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void* lpReserved)
{
        return 1;
}
extern "C" void __export  Message(char *s)  {
    Application->MessageBox(s,"From DLL",IDOK);
    }
 
extern "C" void __export  Plus(int a, int b, int c)  {
    c=a+b;
}

int c=0,a=5,b=7;
void (__stdcall *Plus)(int x, int y, int z);
    HINSTANCE dllp = LoadLibrary("p1.dll");
    if (dllp) {
        Plus= (void(__stdcall *) (int x, int y, int z))
        GetProcAddress(dllp, "_Plus");
        if (Plus)
                        {
                        Plus(a, b, c);
                        Memo1->Lines->Add(c);
                        }
                }
    FreeLibrary(dllp);
}

void Inc (int &y)
{
   y++;
}
//----------------------------------
void CreateParam(AnsiString &Input)
{
   Input = "[p]" + Input + "[/p]";
}
//----------------------------------

// ...
int x = 5;
Inc(x);
Inc(x);
ShowMessage(IntToStr(x));
AnsiString MyParam = "IsNew";
CreateParam(MyParam);
ShowMessage(MyParam);
// ...