我在vb中加了一个视频播放软件 请问如何有vb控制视频播放软件中的 停止 播放 全屏
我在vb中加了一个视频播放软件 请问如何有vb控制视频播放软件中的 停止 播放 全屏求求求高手指点 --------------------编程问答-------------------- 什么方式加的?插件? --------------------编程问答-------------------- WMPlayer控件是不错选择
属性/方法名: 说明:
[基本属性]
URL:String; 指定媒易做图置,本机或网络地址
uiMode:String; 播放器界面模式,可为Full, Mini, None, Invisible
playState:integer; 播放状态,1=停止,2=暂停,3=播放,6=正在缓冲,9=正在连接,10=准备就绪
enableContextMenu:Boolean; 启用/禁用右键菜单
fullScreen:boolean; 是否全屏显示
[controls] wmp.controls //播放器基本控制
controls.play; 播放
controls.pause; 暂停
controls.stop; 停止
controls.currentPosition:double; 当前进度
controls.currentPositionString:string; 当前进度,字符串格式。如“00:23”
controls.fastForward; 快进
controls.fastReverse; 快退
controls.next; 下一曲
controls.previous; 上一曲
[settings] wmp.settings //播放器基本设置
settings.volume:integer; 音量,0-100
settings.autoStart:Boolean; 是否自动播放
settings.mute:Boolean; 是否静音
settings.playCount:integer; 播放次数
[currentMedia] wmp.currentMedia //当前媒体属性
currentMedia.duration:double; 媒体总长度
currentMedia.durationString:string; 媒体总长度,字符串格式。如“03:24”
currentMedia.getItemInfo(const string); 获取当前媒体信息"Title"=媒体标题,"Author"=艺术家,"Copyright"=版权信息,"Description"=媒体内容描述, "Duration"=持续时间(秒),"FileSize"=文件大小,"FileType"=文件类型,"sourceURL"=原始地址
currentMedia.setItemInfo(const string); 通过属性名设置媒体信息
currentMedia.name:string; 同 currentMedia.getItemInfo("Title")
[currentPlaylist] wmp.currentPlaylist //当前播放列表属性
currentPlaylist.count:integer; 当前播放列表所包含媒体数
currentPlaylist.Item[integer]; 获取或设置指定项目媒体信息,其子属性同wmp.currentMedia
playState:integer; 播放状态。这个属性改变时同时引发PlayStateChange事件与StateChange事件。取值范围为枚举型:WMPLib.WMPPlayState,它的成员如下:
wmppsUndefined = 0; //未知状态
wmppsStopped = 1; //播放停止
wmppsPaused = 2; //播放暂停
wmppsPlaying = 3; //正在播放
wmppsScanForward = 4; //向前搜索
wmppsScanReverse = 5; //向后搜索
wmppsBuffering = 6; //正在缓冲
wmppsWaiting = 7; //正在等待流开始
wmppsMediaEnded = 8; //播放流已结束
wmppsTransitioning = 9; //准备新的媒体文件
wmppsReady = 10; //播放准备就绪
wmppsReconnecting = 11; //尝试重新连接流媒体数据
wmppsLast = 12; //上一次状态,状态没有改变赞同0| 评论 --------------------编程问答-------------------- x = Shell("D:\Program Files\Stereoscopic Player\StereoPlayer.exe ", 1)
用shell调用的
--------------------编程问答--------------------
WindowsMediaPlayer1.Controls.stop'停止--------------------编程问答-------------------- 如果没有开放接口的话,只能考虑sendmessage了 --------------------编程问答-------------------- WindowsMediaPlayer1.Controls.stop'停止
WindowsMediaPlayer1.Controls.play'播放
WindowsMediaPlayer1.fullScreen = True'全屏
WindowsMediaPlayer1.Controls.play'播放
WindowsMediaPlayer1.fullScreen = True'全屏
WindowsMediaPlayer是不是代表windows中自带的媒体播放器啊 --------------------编程问答--------------------
可以这么说,windows自带一个播放控件,我们通常称之为:wmplayer控件,你可以在部件中将其添加到你的程序中,对其编程即可。网上百度一下,有很多的例子的。 --------------------编程问答-------------------- 用vb调用Windows Media Player可以实现 暂停 播放等功能为什么Stereoscopic Player (未注册)不可以
Windows Media Player标题栏显示Windows Media Player
Stereoscopic Player标题栏显示Stereoscopic Player (未注册)
hwnd = FindWindow(vbNullString, "Windows Media Player")
可以用
hwnd = FindWindow(vbNullString, "Stereoscopic Player (未注册)")
不可以用
只能让其窗口置前不能调用菜单功能
求教!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! --------------------编程问答-------------------- vb中如把一个工程里面的textbox 调入另一个工程里面的listbox --------------------编程问答-------------------- --------------------编程问答-------------------- shell出来的东西,严格来说不是在“程序”里面。无法象控件一样控制。
你有两个办法可以实现,当然,是不一定能实现。
1)通过句柄,找到StereoPlayer.exe中“播放”、“暂停”等的句柄(FindWindowEx),然后通过SendMessage发送点击消息。
这种方法是可以获取按钮的句柄前提下才可以。你可以使用SPY++这个工具来辅助一下。
2)通过向目标窗口发送按键的方法。
很多播放器都有按键控制的,例如暴风就是按空格就暂停的。你可以通过发送空格来进行控制。类似这样。
如果你要将视频窗口放到程序里面,那就不能用SHELL了,你可以试下VLC。不过VLC好象对VB6不支持,你只能用VB.NET。 --------------------编程问答--------------------
补充:VB , VBA