编写和动态调用dll

编写

 extern "C" __declspec(dllexport) int __stdcall test(int a);

#pragma argsused
int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void* lpReserved)
{
    return 1;
}
//---------------------------------------------------------------------------

int __stdcall test(int a)
{
    TForm2 *Form1 = new TForm2(NULL);
    Form1->ShowModal();
    delete Form1;
   
    return a+3;
}

 

调用

    HINSTANCE hwnd;
    int __stdcall (*ddd)(int);
    hwnd = LoadLibrary("D:/Program/Test/Project1.dll");
    ddd = (int (__stdcall*)(int))GetProcAddress(hwnd,"test");
    ShowMessage(IntToStr(ddd(3)));
    FreeLibrary(hwnd);