您当前的位置:首页 > 计算机 > 软件应用 > 行业软件

Inno Setup 播放 XM 格式音乐文件解决方案

时间:04-28来源:作者:点击数:

Inno Setup 不仅是开源免费的安装包制作工具,同时对脚本的扩展支持性也非常友好。在之前的文章中小编给大家分享了通过使用 Inno Setup 可以增加背景音乐的效果,而有些支持的文件格式可能并不能满足多方需求,今天给大家分享的是通过Inno Setup 播放 XM 格式音乐文件解决方案。

什么是 XM 格式音乐?

“.xm” 文件直译 XM=“extended module”,扩展模块,该文件是 Triton 出品的音乐抓轨软件 FastTracker 生成的音频格式文件,该格式基于原始音频 RAW 格式取样,支持多音轨混编采样、采样封装和基本音频编码;它支持多种音效及多声道混合编辑、支持16-bit采样、同时它也有一套专用于“滑音”效果的音频样式表。

ANSI 版 XM 音乐文件

[Code]
procedure PlaySongFile(FileName: String);
external 'PlaySongFile@files:ufMOD.dll stdcall setuponly';

procedure StopSong;
external 'StopSong@files:ufMOD.dll stdcall setuponly';


procedure InitializeWizard();
begin
ExtractTemporaryFile('music.xm');
PlaySongFile(ExpandConstant('{tmp}\music.xm'));
end;

Unicode 版 XM 音乐文件

[Code]
procedure PlaySongFile(FileName: ansiString);
external 'PlaySongFile@files:ufMOD.dll stdcall setuponly';

procedure StopSong;
external 'StopSong@files:ufMOD.dll stdcall setuponly';


procedure InitializeWizard();
begin
ExtractTemporaryFile('music.xm');
PlaySongFile(ExpandConstant('{tmp}\music.xm'));
end;

以上提供了两个版本的Inno Setup播放音乐代码,大家请根据自己的安装版本选择对应的代码使用即可,版本不对应会出现无声音播放效果。

方便获取更多学习、工作、生活信息请关注本站微信公众号城东书院 微信服务号城东书院 微信订阅号
推荐内容
相关内容
栏目更新
栏目热门