//声明:
Beep(
  dwFreq: DWORD;    {声音频率}
  dwDuration: DWORD {声音长度}
): BOOL;				

//下面会以国际标准音的高度发声, 持续 1 秒钟 begin Windows.Beep(440, 1000); {注意: 如果没有 Windows 前缀, 调用的是另一个函数} end;
posted on 2008-02-07 22:48  万一  阅读(3987)  评论(3编辑  收藏  举报