pb怎么获取视频文件的分辨率和播放时长

pb如何获取视频文件的分辨率和播放时长？
在windows下，只要安装了Windows Media Player就可以看到视频文件的分辨率和播放时长等信息，现在我想通过pb得到这些信息，代码该如何写，请高手指点。
我想应该要调用API函数，有写过此类程序的朋友请分享分享，谢了。

------解决方案--------------------
使用windows media player 控件打开媒体后，调用下面函数即可


获取媒体持续时间：ole_1.object.currentMedia.durationString() //00:00格式
获取媒体持续时间（以秒为单位）ole_1.object.currentMedia.getiteminfo("Duration")
获取媒体的宽度ole_1.object.currentMedia.imageSourceWidth()
获取媒体的高度ole_1.object.currentMedia.imageSourceHeight()