求助，关于delphi调用dll

delphi调用matlab写的dll。我用MIDEVA4.5软件将matlab的M函数文件编译成dll后供delphi调用，但是遇到了一些问题，希望大神们能帮我解决下，代码如下：
%-----M文件
function y=fun(a,b)
y=a^2+b^2
end
{delphi调用dll}
function fun(x,y:OleVariant):OleVariant;stdcall;external 'fun.dll'
procedure TForm1.Button1Click(Sender: TObject);
var
s:OleVariant
begin
s:=fun(1,2);
end;
delphi运行后报错，提示“无法定位程序输入点fun于动态链接库fun.dll上”