随笔 - 2146  文章 - 97 评论 - 11767 trackbacks - 253

//声明:
MessageBeep(
  uType: UINT {参数是个常数; 根据不同的常数发出不同的声音, 也就是调用了不同的 wav}
): BOOL;			

//参数 uType 可选值:
MB_OK              = 0;
MB_ICONHAND        = 16;
MB_ICONQUESTION    = 32;
MB_ICONEXCLAMATION = 48;
MB_ICONASTERISK    = 64;

//举例, 下面代码会发出错误警告 begin MessageBeep(16); end;
//另外 Delphi 的 Beep 方法在 SysUtils 单元是这样实现的: procedure Beep; begin MessageBeep(0); end;
posted on 2008-02-08 10:33  万一  阅读(...)  评论(...编辑  收藏