如何动态修改Windows Media Player控件的视频窗口? (100分)

  • 主题发起人 主题发起人 siteboy
  • 开始时间 开始时间
难道真的这么难吗??????????
 
我仍然没办法解决,渴望大家的帮助!!!!!!!!
等待中。。。。。。
 
to siteboy:
用delphi7+windows Media Player9
会有一个FullScreen属性的,我试过了,

我也发了一个贴子,http://www.delphibbs.com/delphibbs/dispq.asp?lid=1883803
让我倾家荡产,
可是,第二天我就得到了自己想要的答案,真晕!

 
to 【小高】:
我刚试了不行的,你只是让它全屏显示而已,但没有实现拖动大小功能。
我要的是在拉动窗口大小时,视频大小会跟着改变。
如果你能做到,一定要告诉我,加倍加分也没所谓!!!!!
 
你试试这个!
我没有在MSMediaPlayer上用过!
procedure TForm1.FormResize(Sender: TObject);
begin

MSMediaPlayer1.Width:=screen.Width;
MSMediaPlayer1.Height:=screen.Height;
end;

 
你试试这个!
我没有在MSMediaPlayer1上用过!
procedure TForm1.FormResize(Sender: TObject);
begin

MSMediaPlayer1.Width:=screen.Width;
MSMediaPlayer1.Height:=screen.Height;
end;

 
不好意思!刚才那些不行![:D]
 
realplayer的我解决了,但是windows Media Player还稳如泰山,怎么也搞不动。
天下高手哪去了。。。。。。。。。。。。。。。
 
200多人阅读,只有10个人才发言,天。。。。。。。。。
大家帮不到忙的,也请帮手顶一顶,好让贵人能看得见。。。
我晚晚来这第一时间就是顶,不停地提前。。。。结果还是那样子。。。。。
难道大富翁的富翁们都跑光了。。。。。。。。
百般期待。。。。。。。。
 
用这个方法
procedure TForm1.FormResize(Sender: TObject);
begin

MSMediaPlayer1.Width:=screen.Width;
MSMediaPlayer1.Height:=screen.Height;
end;

再设置MediaPlayer1的属性,双击控件会出现窗口,“按比例伸展打勾!OK
或设置stretchToFit为真
=================
气什么呢,我前天就发类似的贴子,267分,我的家档到现在只有个人回答,
更加的是,就我发贴子的那天一个晚上我没睡终于让我找到了控制Windows MediaPlayer
方法,自己又不能拿分!

我的分啦!!!!!!!!!!!!!!

我现在只是没办法去除那个控件下面的控制条了,要是能只显示视频多好呀!

同是苦命人,有空上聊技术!QQ:66814872
 
To【小高】:
哈哈,你的问题我可以帮你解决,你设置控件的uiMode属性为none就行了。
MSMediaPlayer1.uiMode:='none';
哈哈。。。
是不是觉得我也有用的地方咩,互相帮助,做个朋友吧!QQ 776162
 
问题还没解决呀,请大家帮忙!!!!!!!
 
siteboy:
这个问题前两天我也碰到过,楼上的方法我以前都试过,最后一直没有解决,只好放弃,把窗口大小固定
提供一些信息:
(一) 我用VB试过,使用
MSMediaPlayer1.Width:=form1.Width;
MSMediaPlayer1.Height:=form1.Height;
是完全可以实现的,不知道为什么DELPHI里面不行。
(二)使用Realplayer,Window media player控件,在发布的时候,如果用户机上没有安装
我自己注册控件无法成功,造成软件不能播放。关于这个问题,你以后也会碰到,我浏览了本论坛N多帖子,并无人解决。

希望有人提供这个问题的解决方案。
 
是呀,delphi里真的不行,不知为什么?谢谢你!
请高手高抬贵手,为大家解决这个问题。
 
怎么还是没有人懂?高手在哪???????
 
在全屏播放上打钩就行了
 
不行呀,我都试过了啦!!!!!
 
我也用到REALONE,有兴趣的一起研究。qq 179608325
 
raleone里可以的,
为什么这个就不行,
希望能解决,
 
后退
顶部