如何影像随窗体或图片框的大小而改变大小
我用MMControl和Picture来播放AVI但是随窗体尺寸改变(全屏)影像不能“暴风影音”随之改变,而是有黑边
若把窗体尺寸变小时,影像被剪裁。
请教各位大侠,有什么办法解决这个为题?
谢谢!!! --------------------编程问答-------------------- 如下方法,貌似可以:
--------------------编程问答-------------------- 首先对vbman2003为我花时间解决问题表示衷心的感谢!!! --------------------编程问答--------------------
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
你的程序我运行了,图片可以实现放大缩小功能
不过可能我没说清楚,我的意思是用MMControl控件在Picture来播放AVI影像,实现缩小放大功能。
在此表示感谢!!! --------------------编程问答-------------------- 研究多媒体的人这么这么少啊!!! --------------------编程问答-------------------- 顶 --------------------编程问答-------------------- 好像没有办法了,我试了很多回了,这个MMcontrol的缺陷,可以用API函数去做,不过那们好烦人哟,函数太多太难搞懂了
补充:VB , 多媒体