... 2048, 512 ) ) < 1 MsgStop( cPort + " - Nao disponivel.") retu 0 endif if !BuildCommDcb( cPort + ":" + cProp, @sComm ) MsgStop( cPort + " - Nao ativa.") CloseComm( nComm ) retu 0 endif sComm:= AdjustDCB( sComm ) // corrige DCB if !SetCommState( nComm, sComm) MsgStop( cPort + " - Nao ativa.") ...