有一函数DHPHI定义为
PCCall(port,jh,cmd:Integer;sfile,sbuf:PChar;slen:Integer;var stat:Integer;rfile,rbuf:PChar;var rlen:Integer;timeout:Integer):Integer
说明:
输入:port为串口号。
jh为机号。
cmd为命令字。
sfile固定为nil(0)。
sbuf为指向发送数据包的指针。
slen为发送数据包长度。
rfile固定为nil(0)。
timeout固定为0。
输出:函数返回0,表示通讯成功。
stat返回命令执行结果,0表示成功。
rbuf为指向接收数据包的指针。
rlen为接收数据包长度。 DHPHI的调用例程为:
var rbuf:array[1..16] of Char;
PCCall(1,1,2,nil,'',0,stat,nil,@rbuf,rlen,0);该函数为一DLL文件中的函数
请教各高手在中应如何定义和调用!!
多谢!!
PCCall(port,jh,cmd:Integer;sfile,sbuf:PChar;slen:Integer;var stat:Integer;rfile,rbuf:PChar;var rlen:Integer;timeout:Integer):Integer
说明:
输入:port为串口号。
jh为机号。
cmd为命令字。
sfile固定为nil(0)。
sbuf为指向发送数据包的指针。
slen为发送数据包长度。
rfile固定为nil(0)。
timeout固定为0。
输出:函数返回0,表示通讯成功。
stat返回命令执行结果,0表示成功。
rbuf为指向接收数据包的指针。
rlen为接收数据包长度。 DHPHI的调用例程为:
var rbuf:array[1..16] of Char;
PCCall(1,1,2,nil,'',0,stat,nil,@rbuf,rlen,0);该函数为一DLL文件中的函数
请教各高手在中应如何定义和调用!!
多谢!!
解决方案 »
- vb 求透明的时钟控件,可以像其他控件一样放在窗体上,透明能看到窗体背景的
- 求教MSFlexGrid控件颜色问题,谢谢!!!
- 导入数据库中文出现乱码如何解决
- 急,求助各位大侠,怎么在VBA中加入“Microsoft Common Dialog Control 6.0(SP2)”或“Microsoft Common Dialog Control 6.0(SP3)”?
- 寻找可以版本可以VB6.0相连的MSDN
- 请问怎么把vb做的东西打包啊?用什么工具好啊?
- 请问高手,我的定时器怎么不起作用?
- 请问这是哪错误?
- 他妈的 怪不得没人理我的问题,原来都在无聊的讨论"r大家要继续努力,Visual Basic其实是很好的语言."这类问题
- 如何让我的子窗体显示在父窗体的中央?不知如何我的窗体的StartUpPosition属性不能改变?
- 如何在窗体load事件中判断连接,如连接无效就返回?
- 关于写注册机
如果是String,可用 Byval StrPtr(s)
用 Byref a(0)会出错的