delphi FMX播放m4a声音文件

您可以使用Delphi的FMX框架轻松播放声音文件。

例如，播放hoge.mp3文件时，将TMediaPlayer粘贴在Form上，然后编写如下。

uses

FMX.Media;

MediaPlayer1.FileName := 'hoge.mp3';

if MediaPlayer1.Media<>nil then begin

MediaPlayer1.Play;

end;

除此之外，TMediaPlayer还可以使用Stop方法和属性，例如CurrentTime，Duration，Volume和State。

因此，我检查了可以在Windows上使用的声音文件。根据

http://docwiki.embarcadero.com/Libraries/Tokyo/ja/FMX.Media.TMediaCodecManager

，

wma .mp3 .wav

它变成了。未实现m4a文件。这可能是因为DirectX没有编解码器。

因此，我从

http://www.majorgeeks.com/files/details/windows_8_codecs.html

下载并安装了DirectX编解码器。

另外，我以放置TMediaPlayer的形式编写了以下代码。

initialization

TMediaCodecManager.RegisterMediaCodecClass('.m4a', 'm4a Files', TMediaType.Audio, TWindowsMediaCodec);

そうすると，

MediaPlayer1.FileName := 'hoge.m4a';

if MediaPlayer1.Media<>nil then begin

MediaPlayer1.Play;

end;

能够播放hoge.m4a文件。

后记

根据MSDN

https://msdn.microsoft.com/ja-jp/library/windows/desktop/dd757927(v=vs.85).aspx

，可以在不安装编解码器的情况下使用m4a文件。也许您可以在不安装编解码器的情况下使用mfpack。

https://sourceforge.net/projects/mfpack/

推荐分享