Delphi怎么调用函数接口?
---------
调用函数接口如下:
1. long PJQ_Open()
功能:打开usb设备虚拟串口,并与设备建立连接
返回值:成功:返回相应的串口句柄 >0
失败:返回 -1
---------
请问上述long PJQ_Open()如何调用?
请举个例子说明一下
[解决办法]
是DLL导出的接口吗?
function PJQ_Open: LongInt; stdcall; external 'xxx.dll';
procedure TForm1.Button1Click(Sender: TObject);
begin
if PJQ_Open = -1 then
// 失败
else
// 成功
end;