问题求教

[Vsun]

dc_init_name()

HANDLE USER_API dc_init_name ( short port,
int baud,
const char * name
)

dll开发文档如上描述，我在delphi里应该如何申明呢，初学,我申明如下，总是不成功
function dc_init_name(Port: Shortint; baud: integer; icdevname: Pointer): integer; stdcall; //初始化串口

procedure TForm1.Button2Click(Sender: TObject);
var
icdev: integer;
const
testname: array[0..64] of char = 'abcd';
begin
icdev := dc_init_name(100, 0, @testname);
showmessage(inttostr(icdev));
end;

[日立奔腾浪潮微软松下联想]

function dc_init_name(port: SmallInt; baud: integer; name: PAnsiChar): THandle; stdcall; external 'xxx.dll';
是否stdcall要看USER_API是怎么定义的

[Vsun]

const char * name 主要是这个参数不知道怎么定义，并且不知道如何传入

[日立奔腾浪潮微软松下联想]

function dc_init_name(port: SmallInt; baud: integer; const name: PAnsiChar): THandle; stdcall; external 'xxx.dll';

[Vsun]

谢谢楼上的大神，请问你有做过IC卡方面的开发吗？