WindowsMediaPlayerの再生/停止を認識させるには？

チェリー 2005-11-30 02:31:47 No: 128390

Visual Basic がボタンのクリックを認識できるように
したいと思っています。

Windows Media Player Version 6.4 の場合は
Private Sub Command1_Click()
MediaPlayer1.Play
End Sub

Private Sub Command2_Click()
MediaPlayer1.Stop
End Sub

チェリー 2005-11-30 02:35:46 No: 128391

Visual Basic が
Windows Media Player のボタンのクリックを認識できるように
したいと思っています。

Windows Media Player Version 6.4 の場合は
    Private Sub Command1_Click()
        MediaPlayer1.Play
    End Sub

    Private Sub Command2_Click()
        MediaPlayer1.Stop
    End Sub

で、認識できるようなのですが、
Version10の場合は、
どのようなプロパティ、メソッドを
使用すればよいのでしょうか。

よろしくお願いします。
VB6です。

通ってみた 2005-11-30 03:07:04 No: 128392

自アプリからWindowsMediaPlayer(以下WMP)を操作しようとしているのでしたら、そのコードではWMP6.4であろうともウンともスンとも言わないと思いますが・・・

自アプリ中であるならば、実際にWMP10でそれをやったらどうなりましたか？

参照設定していないだけな気もしなくもないけど・・・

ちなみに
>>MediaPlayer1.Play
は、恐らくボタンを押しているのではなく演奏開始させているだけだと思います
動き的には同じでしょうけど

チェリー 2005-11-30 03:42:54 No: 128393

ご返答ありがとうございます。

参照設定もMedia Playerにチェックしたのですが、

プログラム作成中
MediaPlayer1.の「.」を押した時点で
PlayやStopといったリストが見当たりません。

実行すると
「オブジェクトは、このプロパティまたは
オブジェクトをサポートしていません。」
というエラーがでます。

気がついた点がございましたら
お願いします。

通ってみた 2005-11-30 06:05:01 No: 128394

えっと、WMPの初期設定部分のコードを提示してみてください

それと、ファイル名はWMPに渡せていますか？
何も指定していないで再生しようとしているとか

チェリー 2005-11-30 10:46:16 No: 128395

初期設定のコードは
とくに何もいじっていません。

プロパティ
windowless videoだけFalseで
他の
enableContexMenu
enabled
tabstopなどはすべてTrueです。

URLにもファイル名を指定してあります。

いろいろやってみたものの
やっぱりうまくいきません。

X_File 2005-12-01 07:07:03 No: 128396

これは？

    With WindowsMediaPlayer1
      .URL = "ファイルパス"
      .stretchToFit = True
      With .settings
        .Rate = 1
        .balance = 0
        .defaultFrame = ""
        .autoStart = -1          'True
        .volume = 100
        .mute = 1                'False
        .enableErrorDialogs = 0    'False
      End With
    End With

X_File 2005-12-01 07:13:45 No: 128397

>Visual Basic が
>Windows Media Player のボタンのクリックを認識できるように
>したいと思っています。

失礼しました。「Visual BasicからWindows Media Playerを
制御したい」と解釈しまして・・
これかな？

WindowsMediaPlayer1.Controls.play