如何在WMP9中实现代码的全屏播放和200%屏幕播放,急,急,急。。。。。。(12分)

  • 主题发起人 主题发起人 duying668
  • 开始时间 开始时间
D

duying668

Unregistered / Unconfirmed
GUEST, unregistred user!
如何在WMP9中实现代码的全屏播放和200%屏幕播放,急,急,急。。。。。。(不用右键的
功能|
 
with MediaPlayerdo

begin

FileName:='xxx.avi';
Form1.BorderStyle:=bsNone;
Form1.WindowState:=wsMaximized;
Display:=Form1;
DisplayRect:=Form1.ClientRect;
Open;
Play
end
 
说的是mp9,楼上回答的是delphi自带的控件吧
 
好像不行的吧
 
自己取了原始大小后 自己变吧 然后FormResize
Form1.WindowsMediaPlayer1.currentMedia.imageSourceWidth;
Form1.WindowsMediaPlayer1.currentMedia.imageSourceHeight;

自适应(放在Resize里)
Form1.WindowsMediaPlayer1.DoObjectVerb(-1);
 
不知是不是指WMP9的activex控件,如果是: wmp9.fullScreen:=true;
这个定义可以实现全屏幕.
 
小弟可以问问吗?WMP9的activex控件是不是可以用来做在自己的程序上来播放MP3?
这个控件在哪?
 
WMP9的activex控件用来放MP3太过于大材小用了,装上codec,filter后rm,mov,ogg,ape都可以放!
 
后退
顶部