戻る

AVI ファイルを任意のフォーム上で再生する方法(マルチメディアMCIコントロールの使用例)
動作環境 Windows95/98 開発環境 Visual Basic 6.0 (+SP3)
説明 マルチメディアMCIコントロールでAVI ファイルを任意のフォーム上で再生する方法です。
用意するもの：標準フォーム(Form1)、マルチメディアMCIコントロール(MMControl1)


以下のサンプルでは、AVIファイルをForm1上で再生します。
再生する位置を指定する方法は、現在のところ研究中です。

Private Sub Form_Load()

MMControl1.DeviceType = "AVIVideo"
MMControl1.FileName = "ここにAVIファイルのフルパスを指定してください"

'出力を表示するウィンドウを指定します。
MMControl1.hWndDisplay = Form1.hwnd

MMControl1.Command = "Open"

End Sub

Private Sub Form_Unload(Cancel As Integer)

MMControl1.Command = "Close"

End Sub