下面一段vc++写的dll,请问怎么转化成delphi声明调用

Question

function WriteUsb(hUsb: THANDLE; SendBuf: PAnsiChar; SendBufferSize: DWORD; var NumberOfBytesWriten:DWORD): Boolean; stdcall;

Answer 1

function WriteUsb(hUsb: THandle; SendBuf: PChar; SendBufSize: DWORD; lpNumberOfBytesWriten: PDWORD): BOOL; stdcall; external 'test.dll';

Answer 2

function WriteUsb(hUsb: THandle; SendBuf: PChar; SendBufSize: DWORD; lpNumberOfBytesWriten: PDWORD): Integer; stdcall; external 'test.dll'; 

Answer 3

推荐去下载 Delphi2Cpp 小工具。
可以转换不少代码的。