supershun

很好用的串口传输文件代码 欢迎大家下载 procedureTfrmComSys.actCancelSendExecute(Sender:TObject); begin iffalse=FSendFinishedthen//如果还在发送文件 begin TimerOut.Enabled:=false;