调用动态库的问题(200分)

下面是我收到的一个调用说明,我要用Delphi调用Data要怎么定义

//引用 dll 文件 读卡
function Read_Card(Data: pchar
CardID: pchar
Sector, Block: integer
MM:
pchar): integer
stdcall
external 'jbc3000pf.dll';

{
Data 数据指针（通常为16个字节的数组或结构）， CardID原始卡号指针 Sector ：扇区号码，Block: 块好，MM: 扇区密码
}
*************

Read_Card(Tdata,CardFactory, 16, 1, 0, PassWord);
//调用 Tdata 为16 字节char 数组 . CardFactory: 为8 字节char 数组
// 返回值是 0 成功 非0 失败

@tdata,@cardfactory 這樣可以..
@tdata,@cardfactory 這樣也可以..不過這樣不知道運行除錯不除錯

procedure TForm1.Button1Click(Sender: TObject);
var
data:array [0..15] of char;
cardID:array [0..7] of char;
pdata,pCardIDChar;
begin
{填充data,cardID字符数组的值
譬如：for i := 0 to 15 do
data := Chr(i*10);
}
pdata := data;
pCardID := cardID;
Read_Card(data,CardFactory, 16, 1, 0, PassWord);
end;

楼上正确

好像是考勤机的

多人接受答案了。