串口每隔1秒发来数据,在发来数据后的半秒内执行一个事件,请问怎样捕获这半秒时间? 本帖最后由 lcmlhs_2005 于 2010-11-27 11:50:43 编辑 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 i1:=GetTickCount;xxxxi2:=GetTickCount;i3:=i2-i1; 毫秒 T1:=GetTickCount;xxxxT2:=GetTickCount;//计算机GetTickCount计时貌似是最小单位15毫秒左右,所以T2-T1的值不能精确=500毫秒if T2-T1>500 then //500毫秒,半秒~ 执行内容 我处理串口, 都是什么时候获得, 什么时候处理;不明白为什么您还要延时 500ms!!!读取串口, 有现成的方法, 在 baidu 中可以找到!!! 接到后可以存到一个List里,然后通过线程执行 使用MSComm控件,它有OnComm事件,可以在OnComm事件中把你要执行的工作执行掉。 delphi quary查询问题 求一简单的SQL语句!! 200分请教一个Corba问题。 如何从技术角度完成网络传输速度的可调。 ▎▎==心情不好,来这里散分==▎▎ 我的BDE打开ODBC的时候需要我密码登陆~~急!!!!!! 怎么模拟右Ctrl键? 类型库到底是什么??具体使用在哪些方面呢????(我菜故我在) 怎样对当前获得焦点的控件发送消息? <<<<我可怜得只剩下分和笑话了。。。。。。。。。 用 delphi读csv文件, 求蓝本S100D考勤机用的LanBen10.dll的详细使用文档
x
x
x
x
i2:=GetTickCount;
i3:=i2-i1; 毫秒
T1:=GetTickCount;
x
x
x
x
T2:=GetTickCount;
//计算机GetTickCount计时貌似是最小单位15毫秒左右,所以T2-T1的值不能精确=500毫秒
if T2-T1>500 then //500毫秒,半秒~ 执行内容
不明白为什么您还要延时 500ms!!!
读取串口, 有现成的方法, 在 baidu 中可以找到!!!