TMediaPlayerでVCD内の動画ファイルを再生するには？

解決

初心者 2005-04-02 13:38:07 No: 14091 IP: 192.*.*.*

TMediaPlayerでVCD内にある動画ファイル「ｘｘ.DAT」を再生したいです。
  ファイルをHDDにコピーして拡張子を「mpeg」に変えるとTMediaPlayerで再生できるのですが、「.DAT」のままだと再生できません。どうしたら再生できるのでしょうか？
    AutoOpenプロパティをTrue、DeviceTypeをdtAutoSelectに設定しました。

  ヘルプファイルをみると下の書かれており、このままだと再生できない事はわかりました。
＞メディアプレーヤは FileName プロパティで指定されたファイルの拡張子
＞からデバイスの種類を判断しようとします

  Delphiはじめたばかりで何もわかりません。もしかしたら初歩的な質問かもしれませんが、ご教示よろしくお願いします。

編集削除

＠ 2005-04-02 15:40:30 No: 14092 IP: 192.*.*.*

DeviceTypeをdtAutoSelectのとき
は拡張子で自動判別されます

mpegは拡張子を指定しないといけません。
Delphiのコードのままでは認識できないようです。
mpeg拡張子で
順番にエラーであればDeviceTypeを順に実行するようにしましたが
動作しませんでした。
また、バージョンによってエラーの動作が違うようです。

※
unit MPlayer;
の
ソースコードの
・openメソッドのDeviceNameを書き換えることで対応できます。
・自分用に継承して動作変える手もあります。
ソースコードが無い場合は、あきらめて
WinAPIを直接そうさしましょう。MCI_OPEN

http://wisdom.sakura.ne.jp/system/winapi/media/mm3.html

編集削除

初心者 2005-04-02 21:27:58 No: 14093 IP: 192.*.*.*

レスありがとうございました。
  記入忘れてましたが、Delphi６ Personal版です。
  unit MPlayerのソースコードありません。
  'WinAPI'勉強します。（参照アドレス見ました。むずかしそー。）

編集削除