mediaplayer如何实现window-->screen的平滑过渡(100分)

  • 主题发起人 主题发起人 枪杆子
  • 开始时间 开始时间
好像没有把题目说清楚

说说是怎么个过渡要求?
 
什么意思?
 
是说Form的边框吗?
 
window是指在1/4大窗口内播放
screen是指在整个屏幕范围内没有边框
平滑是指不停顿,没有瞬间白色底面
 
试着把他们单独放在不同的Form中。若在一个Form中,很难肯定不会有问题发生。
 
好像不难啊,自己创建一个播放窗口,到时候窗口怎么变化不是全都在自己的控制下了吗?
 
枪杆子:
你好,你上次还没搞清吗?创建一个窗口(NEWFORM)让其borderstyle:=bsnone;
按下按钮后,让其DISPLAY:=NEWFORM;NEWFORM。WIDTH:=SCREEN。WIDTH;
NEWFORM。HEIGHT:=SCREEN。HEIGHT;就可以了。注意,不能中途改变NEWFORM的
属性,会没有显示的,你可在窗口模式下用WINDOWS自己创建的窗口,也可另外再个
FORM(注意不是原来建的NEWFORM)让FORM。BOUNDSRECT:=MEDIAPLAYER1。DISPLAYRECT;
另外,我的MP3的问题解决了,如不清楚可以再和我联系。
 
补充:注意这种办法,在机器速度慢时,在从全屏幕到窗口转换时会不太平滑;
但从窗口到全屏幕时没问题,从全屏幕到窗口的转换必须
WITH MEDIAPLAYER1do
begin

TEMP:=MEDIAPLAYER1。POSITION;
CLOSE;OPEN;STARTPOS:=TEMP;PLAY;
END;
否则,窗口没有显示,如是WINDOWS自建的显示窗口你会看到有趣的现象!!
 
接受答案了.
 
后退
顶部