📄 中华电脑书库--delphi实现串口通信的常用的方法--在线教程,电脑教程,电脑文摘。.htm
字号:
<TBODY>
<TR>
<TD class=a14></TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14>sbuf[4]:=byte(＄ ff); </TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14></TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14>sbuf[5]:=byte(＄ 01); </TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14></TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14>sbuf[6]:=byte(＄ f0); //帧尾 </TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14></TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14>senddata;//调用发送函数 </TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14></TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14>end; </TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14></TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14>//接收过程 </TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14></TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14>procedure TFCOMM.Comm1ReceiveData(Sender:
TObject; Buffer: Pointer;BufferLength: Word);
</TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14></TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14>var </TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14></TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14>i:integer; </TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14></TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14>begin </TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14></TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14>viewstring:=‘’ ; </TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14></TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14>move(buffer^,pchar(@rbuf^),bufferlength);
</TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14></TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14>for i:=1 to bufferlength do </TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14></TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14>viewstring:=viewstring＋ inttohex(rbuf[i],2)＋‘’ ;
</TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14></TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14>viewstring:=‘接收’＋ viewstring;
</TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14></TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14>memo1.lines.add(viewstring);
</TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14></TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14>memo1.lines.add(‘’ ); </TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14></TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14>end; </TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14></TD></TR></TBODY></TABLE>
<TABLE width=620 align=center>
<TBODY>
<TR>
<TD class=a14>如果 memo1上显示发送 F0 01 FF FF 01 F0和接收到 F0 01 FF FF
01
F0，这表示串口已正确地发送出数据并正确地接收到数据，则串口通信成功。</TD></TR></TBODY></TABLE><BR><IMG
height=1
src="中华电脑书库--Delphi实现串口通信的常用的方法--在线教程,电脑教程,电脑文摘。.files/down_info.htm"
width=1 border=0></SPAN><BR><BR><FONT color=#666666
size=1>[文章录入员:fightter]</FONT></TD></TR>
<TR>
<TD width="100%" bgColor=#cccccc height=1></TD></TR></TBODY></TABLE><BR>
<TABLE cellSpacing=2 cellPadding=2 width="96%">
<TBODY>
<TR>
<TD vAlign=top width="50%" height="100%"><B>相关文章</B>：<FONT
face="Arial, Helvetica, sans-serif"></FONT> </TD>
<TD vAlign=top width="50%" height="100%"><B>相关软件</B>: <FONT
face="Arial, Helvetica, sans-serif"></FONT></TD></TR></TBODY></TABLE></DIV></TD>
<TD vAlign=top width=180
background=中华电脑书库--Delphi实现串口通信的常用的方法--在线教程,电脑教程,电脑文摘。.files/bg_right.gif
bgColor=#ffffff>
<DIV align=center>
<TABLE height=25 cellSpacing=0 cellPadding=0 width=178 bgColor=#4ab3ff
border=0>
<TBODY>
<TR>
<TD>
<DIV align=center><FONT
color=#ffffff>::PCBOOKCN'ADS::</FONT></DIV></TD></TR></TBODY></TABLE>
<SCRIPT language=JavaScript
src="中华电脑书库--Delphi实现串口通信的常用的方法--在线教程,电脑教程,电脑文摘。.files/ads_a2.js">
</SCRIPT>
<BR>
<TABLE height=25 cellSpacing=0 cellPadding=0 width=178 bgColor=#4ab3ff
border=0>
<TBODY>
<TR>
<TD>
<DIV align=center><FONT color=#ffffff>::</FONT><FONT
color=#ffffff>Delphi/Pascal</FONT><FONT
color=#ffffff>::</FONT></DIV></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=1 cellPadding=1 width=170 border=0>
<TBODY>
<TR>
<TD>
<DIV align=center><A href="http://www.pcbookcn.com/article/57_1.htm"
target=_blank><FONT color=#000000>C/C++/VC</FONT></A><BR><A
href="http://www.pcbookcn.com/article/58_1.htm" target=_blank><FONT
color=#000000>C++Builder</FONT></A><BR><A
href="http://www.pcbookcn.com/article/59_1.htm" target=_blank><FONT
color=#000000>Basic/VB类</FONT></A><BR><A
href="http://www.pcbookcn.com/article/60_1.htm" target=_blank><FONT
color=#000000>Delphi/Pascal</FONT></A><BR><A
href="http://www.pcbookcn.com/article/61_1.htm" target=_blank><FONT
color=#000000>Java编程</FONT></A><BR><A
href="http://www.pcbookcn.com/article/62_1.htm" target=_blank><FONT
color=#000000>FORTRAN</FONT></A><BR><A
href="http://www.pcbookcn.com/article/63_1.htm" target=_blank><FONT
color=#000000>其它</FONT></A><BR></DIV></TD></TR></TBODY></TABLE>
<TABLE height=25 cellSpacing=0 cellPadding=0 width=178 bgColor=#4ab3ff
border=0>
<TBODY>
<TR>
<TD>
<DIV align=center><FONT
color=#ffffff>::阅读排行::</FONT></DIV></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=1 cellPadding=1 width=170 border=0>
<TBODY>
<TR>
<TD>·<A title=Delphi实现串口通信的常用的方法
href="http://www.pcbookcn.com/article/1564.htm"
target=_blank>Delphi实现串口通信的常用的...</A><BR>·<A title=Delphi与Excel的亲密接触
href="http://www.pcbookcn.com/article/1553.htm"
target=_blank>Delphi与Excel的亲密接...</A><BR>·<A title=SQL的基本操作
href="http://www.pcbookcn.com/article/1307.htm"
target=_blank>SQL的基本操作</A><BR>·<A title=OPENGL图形程序设计
href="http://www.pcbookcn.com/article/1559.htm"
target=_blank>OPENGL图形程序设计</A><BR>·<A title=DELPHI下的多线程程序设计(1)
href="http://www.pcbookcn.com/article/1550.htm"
target=_blank>DELPHI下的多线程程序设计(...</A><BR>·<A
title=Delphi中用于读写(I/O)的三种文件类型
href="http://www.pcbookcn.com/article/1577.htm"
target=_blank>Delphi中用于读写(I/O)...</A><BR>·<A
title=Delphi中关于TApplication类的详解
href="http://www.pcbookcn.com/article/1567.htm"
target=_blank>Delphi中关于TApplic...</A><BR>·<A
title=Delphi中初始化.Ini文件的读写
href="http://www.pcbookcn.com/article/1563.htm"
target=_blank>Delphi中初始化.Ini文件...</A><BR>·<A title=谈谈Delphi中的类和对象
href="http://www.pcbookcn.com/article/1566.htm"
target=_blank>谈谈Delphi中的类和对象</A><BR>·<A title=Delphi编译错误中文手册
href="http://www.pcbookcn.com/article/1341.htm"
target=_blank>Delphi编译错误中文手册</A><BR></TD></TR></TBODY></TABLE>
<SCRIPT language=JavaScript
src="中华电脑书库--Delphi实现串口通信的常用的方法--在线教程,电脑教程,电脑文摘。.files/ads_a2b.js">
</SCRIPT>
</DIV></TD></TR></TBODY></TABLE>
<TABLE height=5 cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<TBODY>
<TR bgColor=#4ab3ff>
<TD></TD></TR></TBODY></TABLE>
<TABLE class=fonts cellSpacing=0 cellPadding=0 width=760 align=center
bgColor=#ffffff border=0>
<TBODY>
<TR>
<TD align=middle>
<SCRIPT language=JavaScript
src="中华电脑书库--Delphi实现串口通信的常用的方法--在线教程,电脑教程,电脑文摘。.files/bottom.js"></SCRIPT>
</TD></TR></TBODY></TABLE><!-- 中华电脑书库-电子图书,电脑书籍,电脑教学, 电脑教程,电脑文摘,阅读Delphi实现串口通信的常用的方法,保存Delphi实现串口通信的常用的方法,收藏Delphi实现串口通信的常用的方法--></BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -