提示形参与实参不匹配,但不知怎么修改?

Question

function StreamIn(dwCookie: Longint; pbBuff: PByte; cb: Longint; var pcb: Longint): Longint; stdcall;
  begin
    readfile(dwCookie,pbbuff,cb,pcb,0);
  end;
—————————————
提示形参与实参类型不匹配，就上面的语句，不知怎么改。 
_____________________
这是我从网上下载的,就是提示形参与实参类型不匹配,由于对readfile(API)函数了解不多,不知是那个参数不匹配,应怎么修改readfile(dwCookie,pbbuff,cb,pcb,0);这句.

Answer 1

ReadFile VB声明 
Declare Function ReadFile Lib "kernel32" Alias "ReadFile" (ByVal hFile As Long, lpBuffer As Any, ByVal nNumberOfBytesToRead As Long, lpNumberOfBytesRead As Long, lpOverlapped As OVERLAPPED) As Long 
说明 
从文件中读出数据。与lread函数相比，这个函数要明显灵活的多。该函数能够操作通信设备、管道、套接字以及邮槽 
返回值 
Long，非零表示成功，零表示失败。会设置GetLastError。如启动的是一次异步读操作，则函数会返回零值，并将ERROR_IO_PENDING设置成GetLastError的结果。如结果不是零值，但读入的字节数小于nNumberOfBytesToRead参数指定的值，表明早已抵达了文件的结尾 
参数表 
参数 类型及说明 
hFile Long，文件的句柄 
lpBuffer Any，用于保存读入数据的一个缓冲区 
nNumberOfBytesToRead Long，要读入的字符数 
lpNumberOfBytesRead Long，从文件中实际读入的字符数 
lpOverlapped OVERLAPPED，如文件打开时指定了FILE_FLAG_OVERLAPPED，那么必须用这个参数引用一个特殊的结构。那个结构定义了一次异步读取操作。否则，应将这个参数设为NULL（将函数声明成ByVal As Long，并传递零值） 
注解 
并非每种操作系统都支持对每种设备进行异步操作。Windows 95不支持对一个磁盘文件进行异步读操作（重复读）