e
tatio
r
r
r
r
语法格式：Ope
Port（PortLPCWSTRBaudRate，ByteSize，Parity，StopBitsi
teger）r
r
实现功能：打开串口r
r
参数：port，串口号；例如wi
ce下为从COM1：，COM2：……。wi
32下为COM1，COM2……其他略，顾名思义哈r
r
返回值：错误信息r
r
r
r
fu
ctio
TCE_SeriesOpe
Port（PortLPCWSTRBaudRate，ByteSize，Parity，StopBitsi
teger）：Stri
gr
r
varr
r
ccTCOMMCONFIGr
r
begi
r
r
result：‘’；r
r
hComm：CreateFile（port，GENERIC_READorGENERIC_WRITE，r
r
0，
il，OPEN_EXISTING，0，0）；打开COMr
r
if（hCommINVALID_HANDLE_VALUE）the
begi
如果COM未打开r
r
result：‘CreateFileError！’；r
r
exitr
r
e
dr
r
GetCommState（hComm，ccdcb）；得知目前COM的状态r
r
ccdcbBaudRate：BaudRate设置波特率为BaudRater
r
ccdcbByteSize：ByteSize字节为ByteSize（8bit）r
r
ccdcbParity：ParityParity为No
er
r
ccdcbStopBits：StopBits1个Stopbitr
r
if
otSetCommState（hComm，ccdcb）the
begi
设置COM的状态r
r
result：‘SetCommStateError！’；r
r
CloseHa
dle（hComm）；r
r
exitr
r
e
dr
r
e
dr
r
r
r
语法格式：Se
d（strStri
g）r
r
实现功能：发送数据r
r
参数：str，数据r
r
返回值：无r
r
r
r
procedureTCE_SeriesSe
d（strStri
g）；r
r
varr
r
lrcLo
gWordr
r
begi
r
r
if（hComm0）the
exit检查Ha
dle值r
r
WriteFile（hComm，str，Le
gth（str），lrc，
il）；送出数据r
r
e
dr
r
r
r
语法格式：Receive（）r
r
实现功能：接收串口数据r
r
参数：无r
r
返回值：收到的字符串r
r
r
r
Fu
ctio
TCE_SeriesReceive（）：Stri
gr
r
varr
r
i
buff：array［02047］ofCharr
r
BytesRead，dwErrorLo
gWORDr
r
csTCOMSTATr
r
begi
r
r
ClearCommError（hComm，dwError，CS）；取得状态r
r
数据是否大于我们所准备的Bufferr
r
ifcscbI
Que》sizeof（i
buff）the
begi
r
r
PurgeComm（hComm，PURGE_RXCLEAR）；清除COM数据r
r
exitr
r
e
dr
r
ReadFile（hComm，i
buff，cscbI
Que，
BytesRead，
il）；接收COM的数据r
r
转移数据到变量中r
r
rr