在线高分请教关于程序中延时问题: 想在程序中让点亮的灯延时半秒然后在灭,请问这个延时如何实现? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 sleep函数有一个缺点即:使系统挂起。 var sum:integer;.....sum:=gettickcount;while (gettickcount-sum)<5000 do;让你的灯灭; TimeOut:=Now + EncodeTime(Hour, Min, Sec, MSec); while now < TimeOut do Application.ProcessMessages; 怎样动态地创建与释放TFrame对象? IE插件正常加载后,打开IE该加载项无任何反应 求fastreport 一段原代码!! 用delphi2010 实现将MYsql的一个表数据存入到sql server2008的一个表中 报表预览正常,打印时有半页资料就出现乱码,请问如何解决??? 菜问题,大家帮忙 升星了,没什么好表示的,一点心意。 Excel问题,来者有分 如何DATAGRID 单元格校验,和更新扑获错误 对福利彩票提点建议 求一个字符的AcsII吗的函数 一个构造函数?
sum:integer;
.....
sum:=gettickcount;
while (gettickcount-sum)<5000 do;
让你的灯灭;
while now < TimeOut do
Application.ProcessMessages;