Простая dll-библиотека С++

[lamak]

Задание - нужно создать dll-библиотеку для определения максимума 2 чисел и подключить ее к основной программе. Вроде все сделал по книжке, но при нажатии на кнопку возникает ошибка доступа к памяти.

Код функции:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
  int x = StrToInt(Edit1->Text), y = StrToInt(Edit2->Text);

  HINSTANCE dllInstance = LoadLibrary("dll_proj.dll");
   typedef int (__import *FType(int, int));
   FType * Func_max;

   if (dllInstance)
        Func_max = (FType *)GetProcAddress(dllInstance, "_max");
   else 
        ShowMessage("Error in import 'dll_proj.dll' ");

   Label1->Caption = IntToStr(Func_max(x,y));
   FreeLibrary("dll_proj.dll");
}

Полный код библиотеки

#include <windows.h>
#pragma hdrstop

#define _APPMAINCPP
#include "lab1_dll_h.h"

#pragma argsused

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

 extern "C" int __stdcall __declspec(dllexport) max(int, int);

   int __export max (int a, int b)
{  if (a > b)  return a;
   else return b;
   }

Код header'a:

#define DLL_SPEC extern "C" __export

DLL_SPEC int __stdcall max(int a, int b);

[veniside]

extern "C", насколько я помню, отменяет name mangling, т.е. max() так и останется max(), а не превратится в _max(). Добавьте проверку:

if (dllInstance) {
  //
  Func_max = (FType *)GetProcAddress(dllInstance, "_max");
  if (!Func_max)
    ShowMessage("Здається, ми щось наплутали з name mangling");
}
else 
  ShowMessage("Error in import 'dll_proj.dll' ");

Ну и __stdcall, в половине мест он есть, в половине нет. Даже если это не ошибка, я бы или везде его добавил, или везде убрал.