delphi里如何调用这个DLL(20分)

Version 2.1
--------------------------------
BOOL WINAPI GetPatrolInfo(DWORD &dwCollectorNumber,DWORD *pdwIButtonNumber,DWORD *pdwTime, DWORD dwMaxCount, DWORD nPortNo);

在第PortNo号串口上取采集器记录的最多dwMaxCount条信息.(建议为4096)
pdwIButtonNumber与pdwTime是两个DWORD型指针,应分别指向两个DWORD型数组。数组长度由dwMaxCount决定。
取出的信息钮编号在pdwIButtonNumber中返回，以-1作为结尾；取出的采集时间在pdwTime中返回，以零为结尾。
成功则返回TRUE;出错返回FALSE.
采集器中的信息条数不能超过dwMaxCount.若正好等于dwMaxCount,则数组中无结束项。

BOOL WINAPI GetVidexInfo(DWORD nPortNo)

VFP下调用的方式如下：
DECLARE INTEGER GetPatrolInfo IN LandWell.dll INTEGER @wNum,STRING @pdwIButtonNumber,STRING @pdwTime,INTEGER dwMaxCount,INTEGER nPortN
FlagPort=GetPatrolInfo(@wNum,@pdwIButtonNumber,@pdwTime,dwMaxCount,nPortNo)

BOOL WINAPI GetPatrolInfo(DWORD &dwCollectorNumber,DWORD *pdwIButtonNumber,DWORD *pdwTime, DWORD dwMaxCount, DWORD nPortNo);

Declare in delphi:
function GetPatrolInfo(var dwCollectorNumber: array of integer;
var pdwIButtonNumber: array of integer;
var pdwTime:array of integer;
dwMaxCount:integer;
nPortNo:integer):boolean;stdcall;

DLL怎么声明呀。？

Dll copy 到当前目录即可