哪有VF6.0的视频教程 就是有演示的那种 谢谢了

VisualFoxpro数据库编程实例视频教程。在这套教程中，作者将通过编制一个实用的人员管理系统程序，教会大家从陌生到熟悉，从熟悉到熟练的一个全过程。

http://www.enet.com.cn/eschool/zhuanti/vf/

VFP开发视频播放三例

我们在利用VFP开发多媒体应用程序时，常常需要播放诸如AVI、MPG等格式的视频文件。笔者在编程实践中摸索出几种播放视频文件的方法，下面介绍各种方法以播放C盘根目录下的wj.avi文件为例。

直接调用媒体播放器进行播放

在程序设计时，可以调用超级解霸、媒体播放器等多种视频播放器播放视频文件。具体实现方法如下：

在一个表单中添加一个命令按钮，其Name属性为CmdPlay。为事件CmdPlay_Click写入以下代码：

Run c:\sthvcd60\mmxvcd c:\wj.avi &&&&调用超级解霸或Run c:\ProgramFiles\WindowsMediaPlayer\mplayer2 c:\wj.avi &&&&调用媒体播放器。

运行该表单时，利用超级解霸或媒体播放器固有的功能按钮控制播放。

利用Multimedia多媒体控件进行播放

在设计时，首先应通过“工具”菜单下的“选项”将Multimedia控件添加到控件箱中。然后，在一个表单中加入一个Multimedia多媒体控件，其Name属性为Olecontrol1。并为事件Form1_Activate加入以下代码：

Thisform.Olecontrol1.DeviceType='avivideo'

&&&&设置多媒体控件管理的设备类型

Thisform.Olecontrol1.FileName='c:\wj.avi' &&&&设置播放的视频文件

Thisform.Olecontrol1.Command='Open' &&&&打开设备

运行该表单时，利用多媒体控件的固有按钮控制播放。

利用可视类Videoframe进行播放

在实现时，首先通过“查看类”下的“添加”项，将Samples类加入，然后，在一个表单中添加Videoframe对象，其Name属性为Videoframe1，再添加三个命令按钮，其Name属性分别为CmdPlay、CmdPause、CmdClose。并为各个事件写入代码：

在CmdPlay_ Click事件中：

Thisform. Videoframe1.VideoFile='c:\wj.avi'

&&&&设置播放文件

Thisform. Videoframe1.OpenVideo &&&&调用打开过程

运行该表单时，利用三个命令按钮即可控制媒体的播放。

05严蔚敏

链接：https://pan.baidu.com/s/1yX9mrSTpXmC-yknUK4eL2w

提取码：x8z9提取码：x8z9 复制这段内容后打开百度网盘手机APP， *** 作更方便哦！

若资源有问题欢迎追问~

---