欢迎来到天天文库
浏览记录
ID:30788627
大小:53.05 KB
页数:6页
时间:2019-01-03
《spcomm控件在delphi70串口通信中的应用》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、摘要:利用Delphi开发工业控制系统软件成为越来越多的开发人员的选择,而串口通信是这个过程中必须解决的问题之一。本文在对几种常用串口通信方法分析比较的基础上,着重讨论了Delphi开发环境下利用Spcomm控件实现PC机与单片机之间串口通信的方法,研究了Spcomm串口通信的关键技术问题,并通过一个实例给出了Spcomm控件在Delphi7.0串口通信中的应用。关键词:串口通信;Delphi7.0;Spcomm控件1引言目前,随着现代信息技术的发展,计算机串口通信技术己日趋成熟。由于微机性能价格比高、分析处理能力强、处理速度快以及单片机抗干扰能力
2、强、使用灵活等特点,利用PC机作为上位机,单片机作为下位机的主从工作方式在工业控制领域中被广泛采用。无忧S3C2410ARM9开发板S3C44B0ARM7开发板350元单片机开发系统498元无忧单片机实验开发板238元PC机与下位机的通信可以采用高级语言编程实现,如Delphi、VC等。Delphi是新一代而向对象的可视化开发工具,它具有功能强大、简便易用和代码执行速度快等特点,越來越在构架企业信息系统方面发挥着重要作用。由于Delphi这些显著特点,利用Delphi开发工业控制系统软件成为越來越多的开发人员的选择,而实现系统监测控制和信息处理的关
3、键是解决PC机与单片机之间的串口通信问题。2.Spcomm串口通信组件简介用Delphi实现和I通信,常用的方法有:使用控件,如Mscomm和Spcomm控件等;使用API函数;在Delphi中调用其它串口通信程序[1]。使用API方法的优点是比较适合于编写较为复杂的低层次通信程序,但缺点是编写串口通信程序较为复杂,需要掌握大量通信知识。Spcomm是Small-PigTeam开发的一个第三方Delphi串口控件⑵,该控件具冇丰富的与串口通信密切相关的屈性及事件,提供了对串口的各种操作,且编程简单、通用性强、可移植性好。在Delphi软件开发中已经
4、成为一个被广泛应用的串口通信开发控件。Spcomm共实现了三个类:串口类Tcomm、读线程类TreadThread以及写线程类TwziteThread[l]0Tcomm的某个实例在方法StartComm中打开串口,并实例化了一个读线程ReadThread和一个写线程WriteThread,它们和主线程Z间进彳亍消息的传递,实现串口通信。在Delphi7.0屮安装Spcomm串口通信控件的方法为:选择Delphi7.0的“Component”菜单,点击''InstallComponent..菜单项,然后在弹出的Intoexistingpackage屈
5、性页屮Unitfilename输人框屮选择SPCOMM.pas文件,单击两次“OK”按钮后,就可以将Spcomm控件安装到Delphi7.0的System组件页上。3Spcomm控件串口通信的实现3.1Spcomm控件的基本属性、方法和事件Spcomm串口通信控件的基本属性、方法和事件说明如下:CommName屈性:计算机串口端口号的名字,COM1、COM2......等,在打开串口前,必须填写好此值。Parity属性:校验位None、Odd^Even^Mark>Space等。BaudRate:设定支持串口通信用的波特率9600,4800等,根据实
6、际需要来定,在串口打开后也可更改波特率,实际波特率随之更改。ByteSize屈性:表示一个字节中,使用多少个数据位收发数据,根据具体情况设定5、6、7、8等。StopBits属性:表示一个字节中,使用停止位的位数,根据具体情况设定1、1.5、2等。SendDataEmpty属性:布尔属性,为True时表示发送缓存为空,或者发送队列里没有信息;为False时表示表示发送缓存不为空,或者发送队列里冇信息。StartComm方法:用来打开通信串口,开始通信。如杲失败,则会导致串行口错误。错误类型大致分为串行口己处于打开状态,所以不能打开串行口,不能创建读
7、写进程,不能建立串行口缓冲区等。StopComm方法:用来停止通信串行口的所有进程,关闭串口。WriteCommData(pDataToWrite:PChar;dwSizeofDataToWrite:Word)方法是带冇布尔型返回值的函数,其中参量pszStr-ingToWrite是要写入吊行口的字符吊,DwSizeaf-DataToWrite是要写入的字符串的长度。该函数通过一个写线程向串彳亍口输出缓冲区发送数据。发送操作将在后台默认执行。如果写线程PostMessage成功,则返冋值是True,若写线程失败,返冋值是FalseoOnReceiv
8、eData(Buffer:Pointer;BufferLength:Word),其中Buffer是指向输入缓冲区的指针oB
此文档下载收益归作者所有