我分多,100求教小问题!

Question

1.我要定时提醒的功能,就是输入了个时间,分秒,到时间就自动提醒!
playsound('c:\提醒.wav',SND_FILENAME,SND_SYNC);2.干吗系统提取当前时间赋值给label,但时间变化了,label不变化!
var
   time:tdatetime;
   hour,min,sec,msec:word;
begin
   time:=now;
   DecodeTime(time,hour,min,sec,msec);
   label1.Caption:='时间是:'+inttostr(hour)+'时'
   +inttostr(min)+'分';
end;
该怎么让label或者其他的控件上的时间信息跟着系统时间变化;本人信誉第一,及时揭帖!

Answer 1

第二個問題, 將你的代碼放到 一個 timer 控件的 ontime 中!

Answer 2

第一個問題, 將你的 "就是输入了个时间,分秒,"放到一個全局變量中, 也在 timer 的 ontime中比較, 如是, 就執行相應代碼!

Answer 3

1。将你输入的时间放到一个全局变量中保存，然后在Timer控件中通过当前时间与你输入的时间进行比较，如果满足条件则执行你的代码。
2。将你的那段程序放到Timer的Timer事件中就可以

Answer 4

将label控件的信息更改放到timer控件的ontimer中；

Answer 5

第二個問題, 將你的代碼放到 一個 timer 控件的 ontime 中!
让计时器每隔0。5秒就执行一下你那程序!
因为最大误差=时间间隔。要实现更精确的显示，可以定义更小的间隔