多媒体cd播放(20分)

风

风之痕

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-22

• #1

按钮代码如下：
procedure TForm1.Button1Click(Sender: TObject);
begin

opendialog1.execute;
mediaplayer1.filename:=opendialog1.filename;
mediaplayer1.open;
end;


但是无论选择第几首歌，却都从第一首开始播放，直至最后，为什么？
怎样才能按自己所选播放？

 

W

weck

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-22

• #2

嗬嗬，播放cd不是用的文件名，使用的track，也就是轨迹（似乎是这样的）

 

L

lvxq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-22

• #3

就是啊，仔细点看看帮助啊，虽然只20分，也别乱扔啊

 

O

ocean_lover

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-22

• #4

是不是没有清除原来的内容？？？

 

L

lslzf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-22

• #5

使用trackposition

 

F

favour

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-22

• #6

无聊

 

L

lslzf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-23

• #7

for k:=1 to ComboBox1.ItemIndexdo

begin

MediaPlayer1.next;
end;


最苯的方法

 

L

lslzf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-23

• #8

for k:=1 to ComboBox1.ItemIndexdo

begin

MediaPlayer1.next;
end;

 

C

cheka

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-07

• #9

多人接受答案了。