zoukankan      html  css  js  c++  java
  • MmSystem播放Wav格式声音

    //MmSystem播放Wav格式声音 
    //MmSystem 支持 *.wav声音格式 snd ->SoundRecorder
    uses MmSystem; //引用MmSystem

    //播放系统声音
    {
    .Default //这个只要是字符串('str')就好
    MailBeep
    SystemExclamation
    SystemExit
    SystemHand
    }

    PlaySound ('SystemExit',0, snd_Async);//PChar类型字符串

    //播放列表框中的声音
    PlaySound(PChar(ListBox1.Items[listbox1.ItemIndex]),0, snd_Async);

    //播放自定义的wav格式声音
    {
    1 将wav的声音文件放在程序目录下即可
    PlaySound('Hasta.wav',0, snd_ASync);//需要把Hasta.wav 文件放在程序目录下


    2 打包wav文件到*.res文件中

    implementation
    {$R *.dfm}

    {$R sound.res} //引用资源文件*.RES 这个文件必须自己创建
    PlaySound(PChar('anuo'), 0, snd_ASync or snd_Resource);//anuo为*.res里的标识符

    }
    //停止播放
    PlaySound (0,0, 0);

    //循环播放
    PlaySound ('SystemExit',0, snd_Async or snd_Loop);//PChar类型字符串


    //将Wav声音文件打包到程序中(wav格式声音文件)
    STP1.建立一个rc文件; {标识符 声音格式 声音文件} {支持中文名称}
        新建一个记事本 输入 click wave "click.wav" 把本文件保存为 *.rc格式的文件;这里我保存为SOUND.RC
        注:声音文件click.wav 和SOUND.RC必须在同一目录下
    STP2.将rc文件转换为res文件;
        把delphi目录Bin里的brcc32.exe文件复制到C:Windows目录下,开始运行:输入 cmd打开命令栏之后输入:brcc32 C:UsersAdministratorDesktopSOUND.RC
    这样就编译了一个SOUND.RES文件

    STP3.在Uses下面引入 MMSystem;
           在implementation下面输入 {$R SOUND.RES}

    STP4.使用以下代码播放音乐
        PlaySound('click', 0, snd_ASync or snd_Resource);//PChar类型字符串




  • 相关阅读:
    Inline Hook 钩子编写技巧
    FPS 游戏实现D3D透视 (API Hook)
    FPS 游戏实现GDI透视 (三角函数)
    X86驱动:恢复SSDT内核钩子
    X86驱动:挂接SSDT内核钩子
    VS2013+WDK8.1 驱动开发环境配置
    C/C++ 语言之反汇编揭秘:目录
    WinRAR 去广告的姿势
    C/C++ 实现反调试的手段
    springboot项目部署到独立tomcat的爬坑集锦
  • 原文地址:https://www.cnblogs.com/xe2011/p/3875908.html
Copyright © 2011-2022 走看看