ＭＣＩデバイスエラー

解決

nao 2001-08-16 05:55:33 No: 146

delphi超初心者です。簡易的なメディアプレイヤーを組んだんですが、
実行時に【ＭＣＩデバイスがありません】と言うエラーメッセージが出ます。ＭＣＩデバイスは知っていますが、自分のＰＣでＭＣＩデバイスが開放出来てないのかと思い、友達のＰＣでやってみましたが、同様のエラーが出ました。Mplyaer自体は非表示でやっています。
デバイス設定もautoにしてるんですがエラーが出ます。
的を得ない書き方ですいません。仕組み自体が今三つ理解出来てないようです。使用しているコンポーネントはMplayer,OpenDialog,buttonのみです。

kazu 2001-08-17 22:22:40 No: 147

procedure TForm1.Button1Click(Sender: TObject);
begin
  if OpenDialog1.Execute = False then Exit;
  MediaPlayer1.FileName := OpenDialog1.FileName;
  MediaPlayer1.Open;
  MediaPlayer1.Play;
end;
TMediaPlayerのプロパティは
Visible -> False
Display -> Panel1(スピーカーがないためAVIファイルを再生した）
上記以外のプロパティは変更なし。
上記でエラーは出ませんでした。
コードとエラー表示を書き込んでもらえればもっとたくさんのレスが付くと思いますが...

nao 2001-08-19 07:49:59 No: 148

解決しました。有難うございます（ぺこり）
そうですね。今度からはコードを書きます。
でも…どこが主要か判ってないのも痛いですね…
もっと勉強して出なおしてきます（苦笑