调用DLL文件出错
szkxy 2003-02-27 04:47:57 我的DLL文件如下:
library ToolLib;
SysUtils,
Classes;
{$R *.res}
function Three(SourceResult:Integer):String;stdCall;
begin
if SourceResult>0 then
Result:=IntToStr(SourceResult*3) //结果存放于Result
else
Result:=IntToStr(SourceResult);
end;
Main文件如下:
function Three(SourceResult:Integer):String;
StdCall external 'ToolLib.DLL';
...
begin
Showmessage(Three(3));
end;
...
当显示'9'之后就会出错:"invalid pointer operation"