求解！playsound函数问题

我用playsound播放DLL文件中的一个wav资源。代码如下procedure play_audio(dllfile, resname: string; ResType: PChar);
var
h:thandle;
rs:tresourcestream;
begin
h:=loadlibrary(pchar(dllfile));
rs:=tresourcestream.Create(h,resname,restype);
playsound(rs.Memory,0,SND_MEMORY or SND_ASYNC); //内存播放+异步播放
rs.Free;
freelibrary(h);
end;代码运行没错误，可是没有任何声音，必须把异步播放去掉，就可以播放了。我查阅很多资料，都是这样写的，为什么会无法播放呢？？
大家帮帮我，我必须异步播放，因为有些音频有点长。