频道分类

Delphi PlaySound()函数应用

作者:admin 来源: 日期:2019/10/15 12:17:12 人气: 标签:

 

function   PlaySound(pszSound:   PChar;   hmod:   HMODULE;   fdwSound:DWORD):BOOL;stdcall;   
其中的fdwSound为播放方式,常用的有以下标志:     
  标 志     值   功    能     
  SNDSYNC   $0000   同步播放声音,声音播放结束函数才返回(缺省)     
  SNDASYNC   $0001   异步播放声音,声音开始播放后函数立即返回     
  SNDLOOP   $0008   重复播放直到下一次PlaySound     
  SNDNOSTOP   $0010   如果有声音正在播放,函数不播放并返回     
    
Delphi PlaySound()函数应用
如:PlaySound('PlaySound.wav',0,SND_ASYNC);
      PlaySound('Resource_1', 1, SND_RESOURCE or SND_ASYNC);

注意:引用前必须在单元中加入MMSYSTEM单元(MMSYSTEM源文件在delphisource\RTl\WIN目录下),否则不能正确编译。