说明: 串口 实现 function TFTransForm.OpenPort:Boolean; var ret:Integer; begin OpenPort := false; ret := sio_open(GCommData.Port); if ret SIO_OK then begin MxShowError('sio_open',ret); Exit; end; if PortSet() = false then begin sio_close(GCommData.Port); Exit
<sjean> 上传 | 大小:238kb