S sennana Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-09 #1 我做了一个小闹钟的软件，在整点时报时，播放一段WAV音乐，求问最简单的 放WAV的方法
Y yzhshi Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-09 #2 调用这个API函数 BOOL sndPlaySound( LPCSTR lpszSound, UINT fuSound ); uses mmsystem;
S sennana Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-09 #4 播放MIDI是否一样呢？ 哦，我调用sndplaysound时将UINT fuSound设为snd_loop,但还是无法 循环播放，如何循环播放呢？
C cqbaobao Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-11 #5 这句不能放MIDI， 要能循环的话，还要加上 SND_ASYNC 标志才行
D DelphiCrazyer Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-12 #6 procedure PlaySound(SoundFile: string); begin mciSendString(Pchar('close '+soundfile),nil,0,0); mcisendstring(pchar('open '+soundfile),nil,0,0); mcisendstring(pchar('play '+soundfile),nil,0,0); end;
procedure PlaySound(SoundFile: string); begin mciSendString(Pchar('close '+soundfile),nil,0,0); mcisendstring(pchar('open '+soundfile),nil,0,0); mcisendstring(pchar('play '+soundfile),nil,0,0); end;
