1

我在我的 Delphi XE5 Firemonkey 移动应用程序中使用不受控制的 TMediaPlayer,设置音量不适用于 iOS 设备和模拟器,但它适用于 Abdroid,知道吗?

MusicMediaPlayer := TMediaplayer.Create(nil);
MusicMediaPlayer.FileName := TmpFile;
MusicMediaPlayer.Play;
if IsMusicOn then
    MusicMediaPlayer.Volume := 0.03
else
    MusicMediaPlayer.Volume := 0;

使用上面的代码,即使音量为 0,文件也会以最大音量播放。

4

0 回答 0