您的位置：程序门 -> delphi -> game，图形处理/多媒体

如何在delphi中设置以便缩放avi动画

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

如何在delphi中设置以便缩放avi动画[已结贴,结贴人:hapland]

发表于：2007-12-19 23:32:06 楼主

我希望在程序中播放一组avi动画（多个文件），它们的大小是不同的

在delphi7中可以使用一个tmediaplayer和一个tpanel（或者tanimate）配合显示avi，
确实可以显示，没有问题

问题是：panel小了，avi被裁剪了（多余部分不显示），panel大了，没有avi像素的地方是白板

panel的大小无法和avi文件的像素关联。animate的大小也一样无法根据avi文件的像素动态变化

我查找了部分参考，也没有看到有关提示，

请问各位大侠：
1、什么方法可以获取avi视频文件的分辨率信息，以便动态调整播放控件的大小；
2、如何可以拉伸avi动画，使之自动适应我们的播放窗口？
或者如何可以调整avi的播放输出尺寸？

谢谢！！

发表于：2007-12-20 08:43:361楼得分:0

1
2 mediaplayer1.displayrect:=rect（0,0,panel1.width,pane11.height)

发表于：2007-12-20 09:07:002楼得分:0

1 媒体的原始尺寸，在mediaplayer的filename属性确定并open后 width=mediaplayer1.displayrect.right height:=mediaplayer1.displayrect.bottom

发表于：2007-12-20 09:16:053楼得分:190

自动适应我们的播放窗口
panel1.width:=mediaplayer1.displayrect.right;
panel1.height:=mediaplayer1.displayrect.bottom;
mediaplayer1.displayrect:=rect（0,0,panel1.width,pane11.height);

发表于：2007-12-20 09:35:564楼得分:10

up,楼上的研究得不错

发表于：2007-12-20 11:34:145楼得分:0

我刚才测试了，确实可以！

感谢二维大侠参与，谢谢！！

下一篇：做了一个三测单控件，大家看看需要不？
上一篇：求购一套完整的能够交互编辑的cbc矢量图源代码

其他资讯