MediaPlayer1控件

VB的MediaPlayer1控件

URL:string                         可以指定媒体位置
enableContextMenu:Boolean 显示/不显示播放位置的右键菜单
fullScreen:boolean                 全屏显示
stretchToFit:boolean              非全屏状态时是否伸展到最佳大小
uMode:string                      播放器的模式，full：有下面的控制条; none：只有播放部份没有控制条
playState:integer                    当前控件状态，下面是三种基本状态：
3：正在播放
2：暂停
1：已停止
状态变化时会触发OnStatusChange事件
[controls]
可通过WindowsMediaPlayer.controls对播放器进行控制并取得相关的一些信息：
controls.play;    播放
controls.stop;    停止
controls.pause;    暂停
controls.currentPosition：Double 当前播放进度
controls.currentPositionString：string 时间格式的字符串 "0:32"

[currentMedia]
可以通过WindowsMediaPlayer.currentMedia取得当前媒体的信息
currentMedia.duration   Double 总长度
currentMedia.durationString 时间格式的字符串 "4:34"

[settings]
可以通过WindowsMediaPlayer.settings对播放器进行设置，包括音量和声道等。
settings.volume:integer 音量 （0-100）
settings.balance:integer 声道，通过它应该可以进行立体声、左声道、右声道的控制。但对应的取值尚不清楚。


       以上提到的，全是我已经在windows98+Mediaplayer9+delphi7环境下试过了的，其实Mediaplayer9的ActiveX还有好多的属性、方法，我没法一一列出（其实多数是我搞不明白啦，原来下过一个英文的SDK，有详细介绍，不过我看不太懂），一人之力有限，还希望有心人能多多挖掘，多多交流。


记录格式说明：  
“@@ 语言 = xxxx”：记录当前翻译用语言的种类，必须在首部，请不要更改。  
“@@ 类型库 = xxxx”：如果为包装类型库，则记录类型库的相关信息，请不要更改。  
“@@ 组件 = xxxx”：如果为包装组件，则记录组件的相关信息，请不要更改，与类型库信息不能同时存在。  
“##1”：表示某翻译项的开始，格式为“##1 项目原名 = 翻译后的名称”，  
下行首直到下一翻译项标记处记录有关此项目的详细解释信息。  
“##0”：记录被屏蔽的项目，被屏蔽项目将不会被包装支持库输出。  
格式为“##0 项目原名”，不能屏蔽参数。  
##1 WindowsMediaPlayer = WMP播放器  
Windows媒体播放器控件  

##1 WindowsMediaPlayer.close = 关闭  
关闭媒体播放器  

##1 WindowsMediaPlayer.URL = 地址  
返回或设置要播放的媒体文件的文件名或者URL，例如"c:/1.mp3"，"http://www.cnn.com/video.asf"  

##1 WindowsMediaPlayer.openState = 打开状态  
返回播放器的打开状态  

##1 WindowsMediaPlayer.playState = 播放状态  
返回播放器的播放状态，使用"播放状态"枚举常量  

##1 WindowsMediaPlayer.Getcontrols = 取控制  
获取控制对象  

##1 WindowsMediaPlayer.Getsettings = 取设定  
获取设定对象  

##1 WindowsMediaPlayer.GetcurrentMedia = 取当前媒体  
获取当前媒体对象  

##0 WindowsMediaPlayer.GetmediaCollection = Notuseful  
获取媒体集合对象  

##0 WindowsMediaPlayer.GetplaylistCollection = Notuseful  
获取播放列表集合对象  

##1 WindowsMediaPlayer.versionInfo = 版本信息  
返回Windows Media Player的版本信息  

##0 WindowsMediaPlayer.launchURL = Notuseful  


##1 WindowsMediaPlayer.Getnetwork = 取网络  
获取网络对象  

##1 WindowsMediaPlayer.GetcurrentPlaylist = 取当前播放列表  
获取当前播放列表对象  

##1 WindowsMediaPlayer.GetcdromCollection = 取光驱集  
获取光驱集合对象  

##0 WindowsMediaPlayer.GetclosedCaption = Notuseful  
Returns the closed caption handler  

##1 WindowsMediaPlayer.isOnline = 在线  
返回当前计算机是否连接到了Internet上  

##0 WindowsMediaPlayer.GetError = Notuseful  
获取错误对象  

##1 WindowsMediaPlayer.status = 状态  
以文本型方式返回当前播放器的状态  

##0 WindowsMediaPlayer.Getdvd = Notuseful  
获取DVD对象  

##0 WindowsMediaPlayer.newPlaylist = Notuseful  
创建一个新的播放列表  

##1 WindowsMediaPlayer.newPlaylist.bstrName = 播放列表名  
新的播放列表的名称  

##1 WindowsMediaPlayer.newMedia = 创建媒体对象  
创建一个新的媒体对象  

##1 WindowsMediaPlayer.newMedia.bstrURL = 媒体文件  
媒体文件名，例如："c:/1.mp3"，"http://www.cnn.com/capsaddam.wmv"  

##1 WindowsMediaPlayer.enabled = 可用  
返回或设置控件是否可用  

##1 WindowsMediaPlayer.fullScreen = 全屏模式  




4 MediaPlayer9 ActiveX 攻略  
   返回或设置控件是否使用全屏幕模式  

##1 WindowsMediaPlayer.enableContextMenu = 菜单可用  
返回或设置在Windows Media Player控件界面中是否使用菜单  

##1 WindowsMediaPlayer.uiMode = 界面模式  
返回或设置控件界面的模式，可以为以下文本型常量之一："invisible"、#隐藏所有；  
"none"、#只显示视频或者音频效果；"mini"、#MINI模式；"full"、#完整模式；"custom"、#自定义效果  

##1 WindowsMediaPlayer.stretchToFit = 自适应尺寸  
返回或设置视频大小是否适应控件大小  

##1 WindowsMediaPlayer.windowlessVideo = 无窗口模式  
返回或设置控件播放视频是否在无窗口模式  

##1 WindowsMediaPlayer.isRemote = 远程模式  
返回播放器是否在远程方式下运行  

##0 WindowsMediaPlayer.GetplayerApplication = Notuseful  
获取播放程序对象  

##1 WindowsMediaPlayer.openPlayer = 打开播放器  
使用指定的URL连接来打开Windows Media Player主程序  

##1 WindowsMediaPlayer.openPlayer.bstrURL = URL  
例如:"c:/1.mp3","http://www.cnn.com/video.wmv"  

##1 WindowsMediaPlayer.SetcurrentMedia = 置当前媒体  
设置当前媒体对象  

##1 WindowsMediaPlayer.SetcurrentMedia.属性值 = 媒体对象  
媒体对象  

##1 WindowsMediaPlayer.SetcurrentPlaylist = 置当前播放列表  
设置当前播放列表  

##1 WindowsMediaPlayer.SetcurrentPlaylist.属性值 = 播放列表  
播放列表对象  

##1 _WMPOCXEvents.OpenStateChange = 打开状态被改变  
当前打开状态被改变的时候触发此事件  

##1 _WMPOCXEvents.OpenStateChange.NewState = 新的状态  
使用"打开状态"枚举常量  

##1 _WMPOCXEvents.PlayStateChange = 播放状态被改变  
当播放状态属性被改变的时候触发此事件  

##1 _WMPOCXEvents.PlayStateChange.NewState = 新的状态  
请参见"播放状态"枚举常量  

##1 _WMPOCXEvents.AudioLanguageChange = 音频语言被改变  
当音频语言被改变的时候触发此事件  

##1 _WMPOCXEvents.AudioLanguageChange.LangID = 语言标识  
新的语言的标识(LCID)  

##1 _WMPOCXEvents.StatusChange = 状态被改变  
当前状态属性被改变的时候触发此事件  

##0 _WMPOCXEvents.ScriptCommand = Notuseful  
Sent when a synchronized command or URL is received  

##0 _WMPOCXEvents.NewStream = Notuseful  
Sent when a new stream is started in a channel  

##0 _WMPOCXEvents.Disconnect = Notuseful  
Sent when the control is disconnected from the server  

##1 _WMPOCXEvents.Buffering = 正在缓冲  
本时间在Windows Media Player控件缓冲或下载，并且在缓冲开始或结尾部分时触发。  

##1 _WMPOCXEvents.Buffering.Start = 是否在开头  
如果为 真，正在缓冲开头，反之，为正在缓冲结尾  

##1 _WMPOCXEvents.Error = 错误发生  
当发生错误的时候触发此事件  

##0 _WMPOCXEvents.Warning = Notuseful  
Sent when the control encounters a problem  

##0 _WMPOCXEvents.EndOfStream = Notuseful  
Sent when the end of file is reached  

##1 _WMPOCXEvents.PositionChange = 位置被改变  
当播放位置被改变的时候触发此事件  

##1 _WMPOCXEvents.PositionChange.oldPosition = 旧的位置  


##1 _WMPOCXEvents.PositionChange.newPosition = 新的位置  


##0 _WMPOCXEvents.MarkerHit = Notuseful  
Sent when a marker is reached  

##0 _WMPOCXEvents.DurationUnitChange = Notuseful  
Indicates that the unit used to express duration and position has changed  

##1 _WMPOCXEvents.CdromMediaChange = 光驱媒体更改  
本事件在CD/DVD光驱在弹出或插入时被触发