下载地址:
下载地址1(本站为飞网专业下载站,域名:down.cfei.net)
资源简介:
串口 实现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; end; OpenPort := true; GbOpen := true; SwitchMenu(); ShowStatus();end;procedure TFTransForm.ClosePort;begin sio_close (GCommData.Port); GbOpen := False; SwitchMenu(); ShowStatus();end;function TFTransForm.PortSet:boolean
飞网下载站,免费下载共享资料,内容涉及教育资源、专业资料、IT资源、娱乐生活、经济管理、办公文书、游戏资料等。