Как я могу воспроизводить DVD файлы, используя wmp.dll? - PullRequest
Новая
       41

Как я могу воспроизводить DVD файлы, используя wmp.dll?

1 голос
/ 26 марта 2010

Мне нужна помощь с моим приложением VB6. У меня есть форма со ссылкой на wmp.dll (Windows Media Player 9 ocx). Я могу воспроизводить многие расширения файлов, такие как Mpg, MPEG, AVI, QT и другие, но я хочу воспроизводить файлы DVD. Я использую следующий код:. 

wmp.url = "D:\VIDEO_TS\VTS_01_0.VOB"

Эта команда работает во всех файлах, но не для файлов DVD.

Я также пытался использовать: 

commondialog1.showopen
wmp1.url=commondialog1.filename
wmp1.controls.play

Это не работает.

Единственная работающая функция: 

wmp1.showplayer(url as string)

Но это показывает объект медиаплеера и воспроизводит файл. Я хочу видеть фильм в своей форме, а не в медиаплеере.

Может ли какое-нибудь тело помочь мне? Большое спасибо.

(я из Аргентины и немного говорю по-английски, поэтому, пожалуйста, извините меня.)

Ответы [ 3 ]

0 голосов
/ 27 марта 2010

См. Windows Media Player SDK . В частности, стоит обратить внимание на DVD Object .

0 голосов
/ 27 сентября 2011

Вот как я, наконец, делаю это в Delphi, предполагается, что DVD - это привод D: 

wmp1.URL := 'wmpdvd://D';

и вот как вы можете просмотреть URL списка воспроизведения DVD 

procedure TForm1.ExploreDVD;
var
  i, j : Integer;
  cd: IWMPCdrom;
  pl: IWMPPlaylist;
begin
  for i := 0 to wmp1.cdromCollection.Count - 1 do
  begin
    cd := wmp1.cdromCollection.Item(i);
    pl := cd.Playlist;

    WriteLn( cd.driveSpecifier );
    WriteLn( pl.Name );
    for j := 0 to pl.count-1 do
      WriteLn(pl.Item[j].sourceURL);
  end;
end;

Надеюсь, это поможет другим людям, которые ищут ответ.

0 голосов
/ 26 марта 2010

Вы пытались получить доступ к DVD следующим образом: 

dvd://E:\

Где E:\ DVD-привод на вашем компьютере?

...