delphi timer 倒计时
我做了一个答题程序，想在答题页面一出现的时候开始倒计时60秒，时间到的时候发出蜂鸣，提示时间到，不用蜂鸣，用提示框也可以，代码怎样写，蜂鸣函数是什么，谢谢

[解决办法]
先定一个变量 比如 i ：= 60；
timer设置为1秒，然后执行timer事件，每次 i:=i-1;当i=0时即到时
[解决办法]
用Timer吧，直接倒计时。

蜂鸣，可以直接用Beep（）
[解决办法]
对了，或者用PlaySound来实现。

uses mmSystem;

PlaySound(PChar(S_Name),0,SND_FILENAME or SND_ASYNC);


[解决办法]
倒计时二楼说的就是。

S_Name是你自己需要的声音文件名，包括扩展名在内，比如 S1.wav