2010-03-26 57 views
1

我需要幫助我的VB6應用程序。我有一個引用wmp.dll的窗體(Windows Media Player 9 ocx)。我可以播放許多文件擴展名,如Mpg MPEG,AVI,QT和其他,但我想播放DVD文件。我使用下面的代碼:如何使用wmp.dll播放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) 

但是這顯示了媒體播放器對象,並播放文件。我想在我的表單中看到不在媒體播放器中的電影。

有些身體可以幫助我嗎? 非常感謝。

(我來自阿根廷少說話英語,所以請原諒我的一切。)

+0

@ Ramses1974:歡迎來到Stack Overflow。我做了一些編輯嘗試讓您的文章更具可讀性。我不認爲我改變了任何意義。如果我這樣做,請隨時將其改回。希望對此有更多瞭解的人能夠幫助你。祝你好運! – 2010-03-26 21:02:12

回答

0

你試過訪問這樣的DVD:

dvd://E:\ 

E:\是在DVD驅動器電腦?

0

下面是我最後做,在Delphi中,假定將DVD驅動器d:

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

,這裏是你如何探索DVD播放URL

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; 

希望這有助於其他人們在尋找答案。