用ActiveMovie Control type library循环播放视频，怎么取得播放完毕事件？

kink 2004-11-09 11:34:54

IMediaEvent IMediaEventEx这2个类怎么用？

播完了第一个播第二个。。。以次类推

...全文

107 2 打赏收藏举报

写回复

2 条回复

切换为时间正序

当前发帖距今超过3年，不再开放新的回复

发表回复

cangwu_lee 2004-11-19

打赏
举报

回复

簡單的判斷，就是用 Timer1_Timer

AprilSong 2004-11-16

打赏
举报

回复

没做过……这里慢慢看吧～

http://msdn.microsoft.com/archive/default.asp?url=/archive/en-us/directx9_c/directx/htm/visualbasicobjects.asp

相关推荐

播放器类模块。通过调用 ActiveMovie control type library (Quartz.dll) 实现对媒体文件的播放，由于视频窗口使用自定容器的hWnd 属性，因此可以用setWindowRgn定制视频窗口形状。相对资源占用较少。可以调节音量，平衡，速度等；算是方便使用吧

Library QuartzTypeLib C:/WINDOWS/system32/quartz.dll ActiveMovie control type libraryDim grp As New QuartzTypeLib.FilgraphManager Const WS_CHILD = &H40000000 Const WS_VISIBLE = &H10000000 Private Sub Form_Load() Dim v As IVideoWindow

1、video标签的使用属性：src(要播放的音频文件路径)、autoplay(是否自动播放)、control(进度条)、loop(循环播放)、onended(是否播放完毕的是一个事件)2、实现了一个简单的播放器界面如下：3、功能主要通过onclick和onended事件来完成的，具体上面有的都实现了，不过音频文件的取名是有要求的，具体看代码4、代码:播放视频播放视频关闭视频您的浏览器暂不支持播放...

改程序实现的是利用ActiveMovie Control 控件和list控件，在这里你可以在list控件中添加歌曲文件的路径，让后双击进行选择，并且可以实现循环播放功能。

1、video标签的使用属性：src(要播放的音频文件路径)、autoplay(是否自动播放)、control(进度条)、loop(循环播放)、onended(是否播放完毕的是一个事件)2、实现了一个简单的播放器界面如下：3、功能主要通过onclick和onended事件来完成的，具体上面有的都实现了，不过音频文件的取名是有要求的，具体看代码4、代码:播放视频播放视频关闭视频您的浏览器暂不支持播放...

发帖

808

社区成员

8287

社区内容

VB 多媒体

社区管理员

加入社区

帖子事件

创建了帖子

2004-11-09 11:34

社区公告

暂无公告