关于定时播放wav文件(200分)!(200分)

  • 主题发起人 主题发起人 asbeforelong
  • 开始时间 开始时间
A

asbeforelong

Unregistered / Unconfirmed
GUEST, unregistred user!


帮忙弄一段代码,基本要求,可以任意设定年,月,日,时,分,到达指定时间自动播放同目录下的wav格式文件。大虾给出详细的代码和注释给200分!类似某些定时软件。
 
我要100分

要原码可以发EMAIL 给我
chatop@cnnb.net
 
chatop您好:
看到http://www.delphibbs.com/delphibbs/dispq.asp?lid=1546143
上您说您有定时调度程序,可以给我一份吗?分数没问题,不过也不多!

我在dfw上也提问了,可是没人回答!
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1418846

刘芳 lfdotey@sina.com
2002-12-29
 
大体上:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if FormatDateTime('hh'+'nn'+'ss', now)=ComboBox3.Text+ComboBox4.Text+'00' then
Showmessage('到时间了!嘿嘿,我说呢,到时间啦啦!!!!快点行动!!!!到时间了!!到时间了!到时间了!!到时间了!到时间了!!到时间了!到时间了!!到时间了!到时间了!!到时间了!到时间了!!');
end;

^_^,在“穿越沦陷的爱”的提示下搞定了,chatop,也给你100分咯,发给我也参考一下
asbeforelong@sina.com
 
唉,剩下100分只好厚着脸皮自己要了,^_^
 
//播放wav文件,注意:需要事先在uses中声明MMSystem

SndPlaySound('Windows XP 启动.wav',SND_ASYNC);
 

Similar threads

回复
0
查看
1K
不得闲
D
回复
0
查看
911
DelphiTeacher的专栏
D
D
回复
0
查看
868
DelphiTeacher的专栏
D
D
回复
0
查看
840
DelphiTeacher的专栏
D
后退
顶部