怎样设置才能让wmplayer控件播放时尺寸固定？该如何解决

怎样设置才能让wmplayer控件播放时尺寸固定？
我在表单中放了一个windowsmedia player控件用于播放视频，但是，视频大小变化时，播放窗口也变化，有没有像图片控件一样的成比例缩放属性。让wmplayer的播放窗口固定。

[解决办法]
假设你的windowsmedia player控件Name值为Ole_WMPlayer7

SQL code

表单的 Init 事件：        With This.Ole_WMPlayer7            .uiMode="Full"                 &&可为Full, Mini, None, Invisible （Full显示全部;mini最简化;None不显示播放控制,只显示视频窗口;invisible全部不显示）,Full和Mini控制条高度为 64            .StretchToFit=.T.             &&自动伸展模式            .Settings.AutoStart=.T.        &&启用自动播放            .Settings.Volume=100        &&音量控制( 0 ~ 100 )            .EnableContextMenu=.F.        &&禁用右键菜单            .fullScreen=.F.            .Move(0,0,你想要的宽度,你想要的高度)            .Controls.stop        Endwith同时在此控件的 StatusChange 事件加代码：This.Move(0,0,你想要的宽度,你想要的高度)