C++ --> Delphi
typedef int apiReturn; // 函数返回值类型
//连接读写器
apiReturn _stdcall ConnectScanner(HANDLE *hScanner, char *szPort, int nBaudRate);
//断开连接
apiReturn _stdcall DisconnectScanner(HANDLE hScanner);
[解决办法]
pPort:array[0..9]of char;
sPort:string;
ZeroMemory(@pPort,10);
sPort:='COM1';
CopyMemory(@pPort,pchar(sPort),10);
调用的时候试试这个代码