100分求教TComm用法。最好有教程，Thx.急需！

lyw0728 2003-11-19 08:10:03

Thx

...全文

41 4 打赏收藏转发到动态举报

写回复

4 条回复

切换为时间正序

请发表友善的回复…

发表回复

netsys2 2003-12-11

打赏
举报

回复

Delphi的，改成CB也很简单

http://www.delphiok.com/bcjq/all/84.htm

huoniao1976 2003-12-11

打赏
举报

回复

自己做的控件？

是不是用于串口通讯的？

JedyWoody 2003-12-11

打赏
举报

回复

还是用VB的控件吧，例子很多的。

lyw0728 2003-11-20

打赏
举报

回复

没人吗？

自编的一个BCB的串口类，使用超级简单，当然功能也超级简单，支持10以上的串口,只支持全双工。不过对于大多数的使用情况来说是足够了。编这个的目的是由于自己下载的串口控件基本上都实现了太多的功能，弄得代码很复杂，不容易分析，本着能用就够和简单最美的原则，同时也为了学习串口编程，自己编了一个串口类。自己在几个程序中用着还挺好的。

该串口类就两个.cpp文件和他们的头文件（TComm.cpp,TCommThread.cpp),使用超级简单
#include "TComm.h"
TComm Comm=new TComm(this); //生成串口类
if(Comm) Comm->fCommReceived=&ReceiveFunc; //你的接收处理函数

Comm->Open(1); //打开你要用的串口，可以填数字，也可以填“com1"等名称，建议填数字，可以支持超过10的数字
Comm->SetComm( 波特率，字长，校验位，停止位 );//校样位0为无，1为奇，2为偶
//好了，可以发数了
Comm->SendData(data,leng);

当收到数的时候会调用你的接收处理函数，比如
ReceiveFunc(TComm *Comm){
char buf[256];
int len;
if((len=Comm->GetReceivedCount())!=0){
len=Comm->ReadComm(buf,len);
}
}
最后使用完后记得关串口喔
Comm->Close();
上传的文件是一个包含有测试例子的项目，很简单的，看一看就明白了。

TComm，Tcomm32控件适用: Delphi 5,Delphi 6,Delphi 7,Delphi 2005, Delphi 2006, Delphi 2007, Delphi 2010,Delphi XE | and C++ Builder 3,C++ Builder 4,C++ Builder 5,C++ Builder 6

Tcomm控件编写Delphi串口调试程序，计算机串口通讯232测试系统，功能有测试端口、传送和接收文件、设置端口波特率、COM口选择，奇偶校验、字节长度设置、停止位选择、保存文件内容、测试通信口等。

Tcomm组件串口通讯 Tcomm组件串口通讯 Tcomm组件串口通讯 Tcomm组件串口通讯

本文论述了在 Delphi环境下，如何利用TComm组件实现串行通信。文章对 TComm 组件的属性、方法和事件及如何利用该组件进行通信作了详细阐述。并介绍了它在全自动生化分析仪项目中的应用。

13,873

社区成员

102,696

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章