Chinaunix首页 | 论坛 | 博客
  • 博客访问: 2341873
  • 博文数量: 816
  • 博客积分: 10000
  • 博客等级: 上将
  • 技术积分: 5010
  • 用 户 组: 普通用户
  • 注册时间: 2008-12-17 17:57
文章分类

全部博文(816)

文章存档

2011年(1)

2008年(815)

分类:

2008-12-17 18:03:46

 我使用了您提供的串口通讯控件 TYbCommdevice控件;
     端口=COM5;波特率=br2400;奇偶=N;数位=7;停止位=2;
     每次打开该串口时,系统CPU 显示100%使用,并系统进入忙状态!并无数据可读。
     我是通过电脑与电子天平联机!
主要程序如下:
//----------------------------------------------    
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
try
   {
     YbCommDevice1->Active = true;
   }
  catch(Exception &e)
   {
     ShowMessage("串口COM: "+e.Message);
    }
}
     
//------------------------------------------------------
     void __fastcall TForm1::Button1Click(TObject *Sender)
       {
 unsigned char Buf[8192]; //分配一个缓存容量相同的Buf
 int n=0;
 AnsiString s;


 //ShowMessage("reading...");
 n= YbCommDevice1->Read(Buf,8192); //检测收到的字节个数N
 //ShowMessage("Data :"+ n);
 if(n>0)

         { // ShowMessage("Get data");
           for(int i=0; i              s += IntToHex(Buf[i],2) + " ";
           s = s.Trim();
           edtPort->Text=s;  //edtPort 属于TEdit
         }
}

--------------------next---------------------

阅读(1164) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~