如何用Mediaplayer播放CD？(50分)

E

eidtn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-03

• #1

如何用Mediaplayer播放CD？
有源代码吗？简单就可以了...谢谢！！！

 

Y

yansh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-03

• #2

看一看帮助里查一下TMediaPlayer类，一定会有收获。
delphi4的有BUG需要升级到updatepack3

 

L

lanjiancn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-03

• #3

没想过让TMediaPlayer来放CD
从来就是用面版上的按钮，真不好意思

 

C

CJF

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-03

• #4

在设备那里，改为CD设备就可以直接用按钮控制的了。。。。

看看那些属性吧。。。

 

D

D影子D

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-03

• #5

好像只能播放有轨道的cd,
device type设为dtautoselect
代码：
button1click()
begin

mediaplayer1.filename:='轨道名';
mediaplayer1.open;
mediaplayer1.play;
end;