|
板凳
楼主 |
发表于 2024-3-13 19:58:03
|
只看该作者
还是不行,老师。
<火山程序 类型 = "通常" 版本 = 1 />
类 启动类 <公开 基础类 = 横向窗口 注释 = " 火山实现超简单的音乐播放器,带播放进度信息。" 注释 = " 注意动态申请存储卡写权限。" 注释 = " 本例程实现了播放本地或者网络音乐。"
@安卓.权限需求 = 安卓权限.读外部存储 @安卓.附加清单 = 常用窗口附加清单.不改变软键盘状态 @安卓.附加清单 = 常用窗口附加清单.全屏窗口 @安卓.附加清单 = 常用窗口附加清单.全面屏2
@安卓.外部资产 = "D:\\xuexi\\supermary1.mp3" 背景图 = "D:\\xuexi\\sucai\\bj1.jpg">
{
变量 音乐播放器1 <类型 = 音乐播放类>
方法 通知_被创建 <公开 注释 = "火山菜鸟驿站:http://www.vowm.cn" @虚拟方法 = 可覆盖>
参数 启动信息对象 <类型 = 启动信息类>
参数 载入参数 <类型 = "对象类 []">
参数 参数数目 <类型 = 整数>
{
父对象.通知_被创建 (启动信息对象, 载入参数, 参数数目)
如果 (是否拥有权限 (安卓权限.读外部存储) == 0)
{
目录_创建 (目录_取私有数据目录 (假))
资产文件_保存到本地 ("supermary1.mp3", 目录_取私有数据目录 (假) + "1.mp3")
音乐播放器1.播放 (目录_取私有数据目录 (假) + "1.mp3")
音乐播放器1.循环播放 = 真
沉浸模式 = 真
}
否则
{
错误信息框 ("没有存储卡权限,请到手机安全中心里面手动设置一下权限。")
打开设置_应用权限 (本对象)
}
}
}
|
|