怎样动态调整 Media Play 控件的显示大小?

海天 2006-04-24 12:04:06
用什么方法可以调整Media Play 的显示大小如50%,200%等?
...全文
178 6 点赞 打赏 收藏 举报
写回复
6 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
skynew2004 2006-05-15
用其他控件啊。
  • 打赏
  • 举报
回复
古月一刀2005 2006-04-29
用的是ActiveX WindowsMediaPlayer 还是Delphi自己的MediaPlayer?,你没说清楚,但可以
ww:=ww *2 div 3; //利用本句和下一句来改变大小
hh:=hh *2 div 3; //...
其中ww,hh是全局参数,代表播放窗口的大小.
  • 打赏
  • 举报
回复
海天 2006-04-28
是ActiveX WindowsMediaPlayer
  • 打赏
  • 举报
回复
老之 2006-04-24
用的是ActiveX WindowsMediaPlayer 还是Delphi自己的MediaPlayer?
  • 打赏
  • 举报
回复
海天 2006-04-24
mediaplayer 里面找不到display属性!!
  • 打赏
  • 举报
回复
zzwu 2006-04-24
我以前的一个软件中有这样的功能,很简单:

procedure TForm1.SpeedButton7Click(Sender: TObject);
var l,t:integer;
begin
ww:=ww *2 div 3; //利用本句和下一句来改变大小
hh:=hh *2 div 3; //...
l:=(form1.width-ww) div 2;
t:=(form1.height-hh) div 2;
form1.color:=clblack;
mediaplayer1.display:=Form1;
mediaplayer1.displayRect:=Rect(l,t,ww,hh);
mediaplayer1.play;
end;

其中ww,hh是全局参数,代表播放窗口的大小.
  • 打赏
  • 举报
回复
相关推荐
发帖
GAME,图形处理/多媒体
加入

1169

社区成员

Delphi GAME,图形处理/多媒体
申请成为版主
帖子事件
创建了帖子
2006-04-24 12:04
社区公告
暂无公告