请问如何在显示from时同时播放wav音乐？

Question

我用delphi做了一个封面，然后在封面的单元中添加了一个playsound函数播放一个wav声音文件，但是我不知道讲这条语句放在哪里，放在formcreate中是先播放声音，然后才出现登陆的封面，请问大家我该把这个函数插在哪里才能使显示封面的同时播放我所指定的wav声音文件呢？

Answer 1

Timer1之interval设为2
procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Timer1.Enabled := false;  
  PlaySound('d:\a.wav', 0, 0);
end;

Answer 2

用  PlaySound ('xxx.wav', 0, SND_ASYNC);最后的参数表示 PlaySound 立即返回，不会阻塞程序继续运行，但声音会持续播放完。