//From http://www.richelbilderbeek.nl/CppBuilderCallDllDynamic.htm

#include <windows.h>

int main()
{
  //Obtain a handle to the DLL
  const HINSTANCE dllHandle = LoadLibrary("ProjectDll.DLL");
  if (!dllHandle)
  {
    MessageBox(0,"Could not load DLL","UnitCallDll",MB_OK);
    return 1;
  }

  //Obtain a handle to the GetAnswerOfLife function
  typedef const int (*GetAnswerOfLifeFunction)();
  const GetAnswerOfLifeFunction AnswerOfLife
    = reinterpret_cast<GetAnswerOfLifeFunction>(
      GetProcAddress(dllHandle,"_GetAnswerOfLife"));

  if (!AnswerOfLife) //No handle obtained
  {
    MessageBox(0,"Loading AnswerOfLife failed","UnitCallDll",MB_OK);
    FreeLibrary(dllHandle);
    return 1;
  }

  if (AnswerOfLife() != 42)
  {
    MessageBox(0,"Function AnswerOfLife failed","UnitCallDll",MB_OK);
    FreeLibrary(dllHandle);
    return 1;
  }
  else
  {
    MessageBox(0,"Function AnswerOfLife successful!","UnitCallDll",MB_OK);
    FreeLibrary(dllHandle);
  }


}