動画を再生するとき、表示する大きさを変えるには？

解決

ぽち 2006-09-26 08:02:03 No: 96720

mmcontrolを使って動画を再生しているのですが、動画ファイルによって映像の大きさが違います。
それらを表示するときに、映像を縮小または拡大して、表示部分の大きさにあわせてあげたいのですが、どうすれば良いでしょうか。

今のところのVBのソースは以下のようになっています。
どなたか、お教えいただけませんでしょうか。

現状では、Picture1の表示枠の中に、オリジナルサイズの映像が表示されます。
Picture1でAutosizeをTrueにしてみたりも試したのですが・・・

---ソース---
Private Sub Dir1_Change()

File1.Path = Dir1.Path

End Sub

Private Sub File1_Click()

    MyFileName = File1.Path & "\" & File1.FileName
    MMControl1.Command = "Close"
    MMControl1.FileName = MyFileName
    MMControl1.Command = "Open"
    MMControl1.hWndDisplay = Picture1.hWnd

End Sub
---ソース終了---

ぽち 2006-09-26 08:03:41 No: 96721

すみません、追記です。
visual basic 6 を使っています。

ぽち 2006-09-26 13:14:16 No: 96722

すみません、結局
http://www.int21.co.jp/pcdn/vb/noriolib/vbmag/9802/mci/
を参考にしながらMCIで作りました。