e语言播放器源码
㈠ 易语言 怎么让源码一打开就播放音乐
1、插入→基裤搜资源→*声音搏历*
2、然后在 _启动窗口_创建完毕 后用播放MP3() 或者把文件弄到运行目录下纯橘面,
3、然后用取运行目录。
㈡ 易语言音乐播放器,视频播放器,幻灯片的源码
1.音乐播放器
新建一个windows窗口,一个通用对话框1.一个编辑框1.五个按钮
.子程序 _按钮1_被单击
通用对话框1.打开 ()
编辑框1.内容 = 通用对话框1.文件名
.子程序 _按钮2_被单击
播放MP3 (1, 编辑框1.内容)
.子程序 _按钮3_被单击
暂停播放MP3 ()
.子程序 _按钮4_被单击
继续播放MP3 ()
.子程序 _按钮5_被单击
销毁 ()
㈢ 谁给我个易语言MP3播放器源码啊 要进度条和显示歌词和列表
.版本 2
.支持库 edroptarget
.支持库 eMMedia
.程序集 窗口程序集_启动窗口
.程序集变量 文件, 文本型
.程序集变量 类型, 整数型
.子程序 _播放按钮_被单击
播放MP3 (-1, 列表框1.取项目文本 (列表框1.现行选中项))
同步播放MP3 (列表框1.取项目文本 (列表框1.现行选中项), 0, 标签1, )
文件 = 列表框1.取项目文本 (列表框1.现行选中项)
类型 = _专辑图片_文件名取专辑图片类型 (文件)
_专辑图片_文件名取专辑图片_到图片框 (文件, 图片框1, 类型)
.子程序 _按钮1_被单击
通用对话框1.打开 ()
列表框1.加入项目 (通用对话框1.文件名, )
' ------------------------------------------------------------------------------------
' 打开对话框,然后在列表框中加入对话框中选择的文件
.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
进度条1.位置 = 参数一
' ------------------------------------------------------------------------------------------------------
' 参数一是MP3的播放进度,进度条的位置将实时同步参数一
' :)
.子程序 _暂停按钮_被单击
暂停播放MP3 ()
.子程序 _继续按钮_被单击
继续播放MP3 ()
.子程序 _时钟1_周期事件
.如果真 (取MP3播放状态 () = 0)
_启动窗口.标题 = “等待播放”
.如果真结束
.如果真 (取MP3播放状态 () = -1)
_启动窗口.标题 = “暂停” + “ ” + 到文本 (进度条1.位置) + “%”
.如果真结束
.如果真 (取MP3播放状态 () = 1)
_启动窗口.标题 = 到文本 (“播放中” + “ ” + 到文本 (进度条1.位置) + “%”)
.如果真结束
' ------------------------------------------------------------------------------------------------------------------------
' 每1毫秒都会检测上面“如果真”的代码,真的真将会执行代码
.子程序 __启动窗口_位置被改变
.如果真 (_启动窗口.位置 = 2)
_启动窗口.可视 = 假
置托盘图标 (#托盘, _启动窗口.标题)
.如果真结束
' -------------------------------------------------------------------------------------------------------------------------
' 如果窗口被最小化,将会看不到窗口,程序将会放到托盘里
.子程序 __启动窗口_托盘事件
.参数 操作类型, 整数型
.如果真 (操作类型 = #单击左键)
_启动窗口.位置 = 1
_启动窗口.可视 = 真
.如果真结束
.如果真 (操作类型 = #单击右键)
弹出托盘菜单 (托盘菜单)
.如果真结束
' -----------------------------------------------------------------------------------------------------------------
' 如果单击了左键,将会把窗口回复,可以看到窗口
' 如果单击了右键,将会弹出“托盘菜单”这个菜单
.子程序 _播放_被选择
播放MP3 (-1, 列表框1.取项目文本 (列表框1.现行选中项))
.子程序 _暂停_被选择
暂停播放MP3 ()
.子程序 _继续_被选择
继续播放MP3 ()
.子程序 _关闭_被选择
销毁 ()
.子程序 _恢复_被选择
_启动窗口.位置 = 2
_启动窗口.可视 = 真
.子程序 __启动窗口_创建完毕
.局部变量 左声道, 整数型
.局部变量 右声道, 整数型
拖放对象1.注册拖放控件 (取窗口句柄 ())
系统音量1.打开 (4)
滑块条1.最小位置 = 系统音量1.取最小音量 ()
滑块条1.最大位置 = 系统音量1.取最大音量 () ÷ 5
系统音量1.取音量 (左声道, 右声道)
滑块条1.位置 = 左声道 ÷ 5
' -------------------------------------------------------------------------------------------------------------------------
' 来自这里 https://jingyan..com/article/0320e2c1db0a181b86507b61.html
' 注册那个命令是让窗口可以把文件拖放进来
.子程序 _拖放对象1_得到文件
.参数 接收到的文件路径, 文本型
列表框1.加入项目 (接收到的文件路径, )
' -----------------------------------------------------------------------------------------------------------------------------
' 把拖进来的文件加入到列表框里
.子程序 _图片框1_被双击, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
载入 (窗口1, _启动窗口, 真)
.子程序 _滑块条1_位置被改变
系统音量1.置音量 (滑块条1.位置 × 5, 滑块条1.位置 × 5)
' -------------------------------------------------------------------------------------------------------------
' 来自这里 https://jingyan..com/article/0320e2c1db0a181b86507b61.html
㈣ 易语言视频播放器源码
易语言的支持库例程里面有,具体打开易语言
如下:
.版本 2
.支持库 eMMedia
.支持库 iext2
.程序集 窗口程序集1
.子程序 _播放按钮_被单击
媒体播放1.播放 (-1)
媒体播放1.取长度 ()
.子程序 _暂停按钮_被单击
.如果 (媒体播放1.取状态 () = 1)
媒体播放1.暂停 ()
.否则
媒体播放1.播放 (媒体播放1.取位置 ())
.如果结束
.子程序 _停止按钮_被单击
媒体播放1.停止 ()
.子程序 _打开_被选择
通用对话框1.过滤器 = “媒体文件|*.wav;*.mid;*.avi;*.mpg;*.mp3;*.wmv;*.rm”
.如果真 (通用对话框1.打开 () = 真)
媒体播放1.打开 (通用对话框1.文件名)
.如果 (媒体播放1.是否视频 () = 真)
_启动窗口.标题 = “视频文件”
.否则
_启动窗口.标题 = “声音文件”
.如果结束
.如果真结束
.子程序 __启动窗口_创建完毕
播放按钮.图片 = 取图片组图片 (#图片组, 0, 取默认底色 ())
暂停按钮.图片 = 取图片组图片 (#图片组, 1, 取默认底色 ())
停止按钮.图片 = 取图片组图片 (#图片组, 2, 取默认底色 ())
.子程序 _选择框1_被单击
.如果 (选择框1.选中 = 真)
媒体播放1.置句柄 (分组框1.取窗口句柄 ())
.否则
媒体播放1.置句柄 (0)
.如果结束
.子程序 _媒体信息_被选择
.局部变量 信息文本, 文本型
信息文本 = “比率:” + 到文本 (媒体播放1.取比率 ()) + #换行符 + “总时间:” + 到文本 (媒体播放1.取总时间 ()) + #换行符 + “长度:” + 到文本 (媒体播放1.取长度 ()) + #换行符 + “播放位置:” + 到文本 (媒体播放1.取位置 ()) + #换行符 + “MCI别名:” + 媒体播放1.取别名 ()
信息框 (信息文本, 0, )
㈤ 我想用易语言做各播放器的vip视频解析软件请问怎么解析,源码什么急求会了必须采纳
输入:超文本浏览框1.地址 = “http://000o.cc/jx/ty.php?url=” + _启动窗口.编辑框1.内容(如果没有接口,那就使用我给的试试)
㈥ 求一个易语言网络视频播放器源码。
那你提供的那个网址必须是视频首地址。记住,是那种在浏览器中一打开就是直接播放视频的地址。否则,任何一种编程语言都是无法做到你说的这种直接放入网址即可播放。除非是在编写的时候写入了你网址的视频规则等,才能实现。
如果你的视频地址是那种一打开就播放的地址的话,就很简单了,用易语言的视频支持库即可。
㈦ 易语言取某网页上的视频并且播放如何实现,求源码
一个超文本浏览框
超文本浏览框.地址=”这里键入视频网页的链接”