Delphi初浅入门笔记之八：多媒体编程一(了解篇)
2011-03-03 00:09
330 查看
调用WindowsAPI播放声音：
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
sndplaysound('',snd_async);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
sndplaysound('C:\Windows\Media\Windows 错误.wav',snd_async);
end;
end.
源代码
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
sndplaysound('',snd_async);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
sndplaysound('C:\Windows\Media\Windows 错误.wav',snd_async);
end;
end.
源代码
内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理 
相关文章推荐
- Delphi初浅入门笔记之九：多媒体编程二(媒体播放器控件篇)
- Delphi初浅入门笔记之十：多媒体编程三(打开图片篇)
- Delphi初浅入门笔记之十一：多媒体编程四(画笔篇)
- 数字图像处理编成入门笔记——第10章 图象处理编程工具及简单的多媒体编程
- Delphi初浅入门笔记之十二：多媒体编程五(绘制文字篇)
- Delphi初浅入门笔记之十三：Windows高级编程(动态链接库)
- QT5.10开发（2）QT入门了解及Demo介绍笔记
- oracle编程入门笔记2015-01-18--执行计划中的索引扫描方式说明
- oracle编程入门笔记2015-01-19--index fast full scan
- [笔记]编程软件了解
- SQL Server 2008编程入门经典笔记(第七章：更复杂的查询)
- CUDA编程入门笔记
- SQL Server 2008编程入门经典笔记：更复杂的查询
- Shader编程笔记（一）<新手入门> 固定管线Shader
- Android NDK编程入门笔记
- 笔记|《简明Python教程》:编程小白的第一本python入门书
- Pygame游戏编程入门笔记
- NDK编程入门笔记
- Delphi初浅入门笔记之三：过程和函数（过程篇）
- opencv学习笔记0 编程简介入门