Delphi XE6 Firemonkey TMediaPlayer-声音播放延迟

我只是想在点击按钮时播放音频文件。我简单地编写了代码，当我点击按钮时，声音会在大约1秒的延迟后出现，我想立即听到，有什么建议吗

   procedure TForm1.btnSound(Sender: TObject);
   begin
       S:='C:\click.wav';
       mediaplayer1.FileName:=S;
       mediaplayer1.play;
  end;

---

简而言之，声音使用本机平台API：

uses
 MMSystem;

function playsound(filename: string);
begin
 sndPlaySound(Pchar(filename), SND_NODEFAULT Or SND_ASYNC);
end;

如果您还需要其他平台的代码，那么有一个库可以做到这一点