不好意思提的菜鸟问题 dll

Question

有如此一个dll:
library Max;
uses
  SysUtils,
  Classes;
Function MyMax(X,Y:integer):integer ; stdcall ;
begin
 if X > Y then
  Result := X
 else
  Result := Y ;
end ;exports
 MyMax;begin
end.
这样调用时，报错....
var
  Form1: TForm1;implementation{$R *.dfm}function MyMax(i:integer):integer;stdcall;
external 'Max.dll';
procedure TForm1.Button1Click(Sender: TObject);
begin
 Label1.Caption:=IntToStr(MyMax(2,3));
end;？？？？？有多点让新手上路的教程吗？

Answer 1

function MyMax(i:integer):integer;stdcall;
external 'Max.dll';
和你DLL里声明的不一样~
function MyMax(x, y: integer): integer; stdcall; external 'Max.dll';