Timer控件 只要你的机器配置不是太CHEAP,完全可以响应的过来,毫秒完全没有问题!不然你把时间间隔值设为1000试试? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 1000 = 1秒;你可能是在OnTimer里的事件里处理的事情太多了,每次都重复(你应该用条件判断一下,这样就能减轻系统对系统的依赖) 你可以在你处理的事情中加如这样的语句:application.processmessage;和VB中的Doevent作用一样的!尽量少用timer控件,很费资源的! varb:boolean;i:integer;ontimer 中:inc(i);有一个过程:while (i mod 2)= 0 do ...;当i mod 2成立时出现时循环,怎样才能让循环条件随Ontimer变化? 你的ontimer事件中是否有死循环 procedure TForm1.TimeriTimer(Sender : TObject);begin Timer1.Enable := False; // // 你自己的代码; // 如果有长循环,不要忘记调用在循环中调用 // application.processmessage; // 这样可以让系统处理其它消息,不会出现假死机的现象 // Timer1.Enable := True; // 这样可以避免第一次Timer事件还没完就激发第二次end; SQL语句关于日期比较 Delphi 如何调用带有安全证书https的Webservice(用Java开发) Delphi5.0的安装序列号是多少? 怎么会类型不匹配? delphi2009+dbexpress 发布软件的问题 SPCOMM控件 我要做一个透明的FORM............ 求教! 急。怎样删除一个有文件的目录, 很菜的问题:请问怎样声明全局变量! BDE API的帮助在哪里?DbiPackTable在哪里找到的? 星座与程序员-----小小调查!嘻~ 给个思路!
你可能是在OnTimer里的事件里处理的事情太多了,每次都重复(你应该用条件判断一下,这样就能减轻系统对系统的依赖)
application.processmessage;
和VB中的Doevent作用一样的!
尽量少用timer控件,很费资源的!
b:boolean;
i:integer;
ontimer 中:inc(i);有一个过程:while (i mod 2)= 0 do
...;
当i mod 2成立时出现时循环,怎样才能让循环条件随Ontimer变化?
begin
Timer1.Enable := False;
//
// 你自己的代码;
// 如果有长循环,不要忘记调用在循环中调用
// application.processmessage;
// 这样可以让系统处理其它消息,不会出现假死机的现象
//
Timer1.Enable := True;
// 这样可以避免第一次Timer事件还没完就激发第二次
end;