delphi timer 倒计时 - Delphi / 数据库相关
我做了一个答题程序，想在答题页面一出现的时候开始倒计时60秒，时间到的时候发出蜂鸣，提示时间到，不用蜂鸣，用提示框也可以，代码怎样写，蜂鸣函数是什么，谢谢
先定一个变量 比如 i ：= 60；
timer设置为1秒，然后执行timer事件，每次 i:=i-1;当i=0时即到时
用Timer吧，直接倒计时。
蜂鸣，可以直接用Beep（）
Beep（）函数就"嗒"一声就没了，有没有声音多些的
那就要自己写程序了。
或者去网上找找相关程序，有不少。
对了，或者用PlaySound来实现。
uses mmSystem;
PlaySound(PChar(S_Name),0,SND_FILENAME or SND_ASYNC);
S_Name是什么呢
你我如果想要这样格式的倒计时，怎么写？
00：00：60
想要倒计时一分三十秒的时候，这样写怎么倒计时
00：01：30
倒计时二楼说的就是。
S_Name是你自己需要的声音文件名，包括扩展名在内，比如 S1.wav
相关问答：
已知Python 中：
s = unicode("测试", "gb2312")
s = u'\u6d4b\u8bd5'
print s
测试
在Delphi里面如何将\u6d4b\u8bd5这样的还原成Gb2312的汉字呢？
找到个方法
......
请教各路高手。武林前辈。我将B.EXE做成资源文件，然后加到123.dll中。用A.EXE来调用123.dll中的B.EXE
请各位前辈帮忙指教下。A.exe如何来调用dll中的exe？代码又该如何写？
无人回答？
做成资源� ......
select * from shuju.DB where 开盘价-收盘价<=0.02
开盘价 与收盘价 是数据库里的字段
select * from aTableName where ((开盘价-收盘价) <=0.02 )
开盘价比收盘价低两分以下的情况
Mark!!!!!!
se ......
xml := CreateOleObject('Microsoft.XMLHTTP');
xml.Open('GET','http://www.google.com', False);
xml.Send;
xml.responseText;
使用xml.responseText可以获取网页源码,但是再次 ......
例子程序见附件，用Delphi 7进行编译
问题代码为
Delphi(Pascal) code:
if Node.ChildNodes <> nil then
begin
for i := 0 to Node.ChildNodes.Count - 1 do
begin
cNode := N ......
