易语言实现视频播放功能

新建工程

打开易语言，新建windows窗口程序。

导入视频播放支持库

易语言默认是没有选择视频播放支持库的。所以，需要增加视频播放支持库的配置。
打开‘工具’->‘支持库配置’界面

选中‘windows媒体播放器’并确定。

增加视频播放组件

在主界面窗口中，增加视频播放组件。

实现选择视频文件功能

添加‘按钮’和‘通用对话框’组件

修改‘通用对话框’的属性，将‘过滤器’的内容改为：视频文件（.mp4）|.mp4

打开视频文件

双击‘按钮’，添加如下代码：

如果真 (通用对话框1.打开 ())
    播放器1.地址 ＝ 通用对话框1.文件名

打开视频选择对话框：

运行程序

源码地址：
视频播放