dephi中怎么显式调用dll中的函数
我的这段程序有什么错呢?我刚学dephi还请各位指点
.....
type
result_matrix = function:PByteArray;StdCall;
.....
procedure TDisplay.FormPaint(Sender: TObject);
var
des,output:PByteArray ;
size,n,k:Integer ;
myfun:result_matrix;
begin
@myfun:=GetProcAddress(Dll,'result_matrix');
if not Assigned(myfun) then
begin
FreeLibrary(Dll);
Dll:=NUlL;
Raise Exception.Create('[GetProcAddress Fail] GetLastError reports:'+
IntToStr(GetLastError));
end
des:=myfun;
.......