当前位置:编程学习 > VB >>

如何影像随窗体或图片框的大小而改变大小

我用MMControl和Picture来播放AVI
但是随窗体尺寸改变(全屏)影像不能“暴风影音”随之改变,而是有黑边
若把窗体尺寸变小时,影像被剪裁。
请教各位大侠,有什么办法解决这个为题?
谢谢!!! --------------------编程问答-------------------- 如下方法,貌似可以:

Dim TmpPic As IPictureDisp

Private Sub Form_Resize()
    Picture1.Move 0, 0, Me.ScaleWidth, Me.ScaleHeight
    Call Picture1_Paint 
End Sub

Private Sub Picture1_Paint()
     Picture1.PaintPicture TmpPic, 0, 0, Picture1.ScaleWidth, Picture1.ScaleHeight
End Sub

Private Sub Form_Load()
    Set TmpPic = LoadPicture("d:\MM.jpg")
End Sub

Private Sub Form_Unload(Cancel As Integer)
    Set TmpPic = Nothing
End Sub

--------------------编程问答-------------------- 首先对vbman2003为我花时间解决问题表示衷心的感谢!!! --------------------编程问答--------------------
你的程序我运行了,图片可以实现放大缩小功能
不过可能我没说清楚,我的意思是用MMControl控件在Picture来播放AVI影像,实现缩小放大功能。
在此表示感谢!!! --------------------编程问答-------------------- 研究多媒体的人这么这么少啊!!! --------------------编程问答-------------------- 顶 --------------------编程问答-------------------- 好像没有办法了,我试了很多回了,这个MMcontrol的缺陷,可以用API函数去做,不过那们好烦人哟,函数太多太难搞懂了
补充:VB ,  多媒体
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,