在delphi 2006中的地址6172676F处的错误访问冲突

时间:2015-01-01 23:52:42

标签: delphi delphi-2006

我正在使用Delphi 2006中的外部DLL文件,当我使用该函数从我的阅读器获取序列号功能工作正常但在那之后我收到错误"访问冲突地址6172676F" 代码:

const NLS_DOF = 'NLS_DOF.dll';
function dof_open(lpszPortType: LPCWSTR; lpszParam: LPCWSTR; lpszDevType: LPCWSTR): THandle; stdcall;external NLS_DOF;
function dof_close(hPort: THandle): Integer; stdcall; external NLS_DOF;
function dof_query(hPort: THandle; lpszQueryBuf: LPCWSTR; lpszResBuf: LPWSTR; dwResBufSize: DWORD): Integer; stdcall;external NLS_DOF;

procedure TForm1.Button3Click(Sender: TObject);
var str:pwidechar;
begin

hPort:= dof_open('com','com=1;baud=9600','2D');
dof_query(hport,'SN',str,1000);

ShowMessage(str);
end;  

当我到达showmessage(str)线时,我收到了错误 我试图删除该行,最后得到了相同的错误; 请任何帮助或我的代码中有错误。

0 个答案:

没有答案