delphi2007 教程

delphi2007 教程

首页 新随笔 联系 聚合 管理
  1013 Posts :: 0 Stories :: 28 Comments :: 0 Trackbacks
如何实现串口控制 我刚开始学delphi 希望得到帮助 Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiNetwork/html/delphi_20061124212852261.html
界面上MaskEdit输入个4位数字  
   
   
   
  最后该4位数字的2进制作为高16位,它们的反码作为低16位,传输到指定串口,先传高位后传低位.  
   
  传输前置低电平一定时间表示开始传输,传输完毕后置高电平.  
   
  请问如何实现?  
   
  另外   是不是XP操作系统不允许   内嵌汇编直接对串口操作  
   
  我的需求是不是应该用API函数来实现?

mscomm可以实现,spcomm也可以  
   
  串口的第4和7脚可以作为数字量输出,也就是作为状态给外面  
  MSComm1.DTREnable   :=   true  
  MSComm1.DTREnable   :=   False  
  就可以表示高低电平了  
 

intME   :integer;  
  lowME,highME:integer;  
   
  lowME   :=   intME   and   &FFFF;  
  highME:=   (intME   and   &FFFF0000)   shr   16;  
   
  传输前先MSComm1.DTREnable   :=   False表示第4脚低电平  
   
  传输后先MSComm1.DTREnable   :=   true表示第4脚高电平  
   
   
 

highME:=   (intME   and   &FFFF0000)   shr   16;  
  右移   直接   highME:=   intME     shr   16;

posted on 2009-05-26 17:27 delphi2007 阅读(199) 评论(0)  编辑 收藏 引用
只有注册用户登录后才能发表评论。