倒，出大问题了…(100分)

C

chatop

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-16

• #1

我的机子上，不管用mediaplayer还是mpegplayer都不行，晕死了…
下面是原码，mediaplayer出错是说什么多媒体驱动出错，而mpegplayer是说什么lib not load
不是会是我没有把控件装好吧………
procedure TForm1.Timer1Timer(Sender: TObject);
var
i:integer;
mp3url:string;
begin
for i:=0 to ListBoxtime.Items.Count-1 do
begin
if listboxtime.items=timetostr(now()) then
mp3url:=listboxfilename.Items;
mpegplayer1.streamname:=mp3url;
mpegplayer1.Play;
end;
end;

 

C

chatop

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-16

• #2

有没有人知道是什么原因呀？

 

春

春意

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-16

• #3

procedure TForm1.Timer1Timer(Sender: TObject);
var
i:integer;
mp3url:string;
begin
for i:=0 to ListBoxtime.Items.Count-1 do
begin
if listboxtime.items=timetostr(now()) then
mp3url:=listboxfilename.Items;
mpegplayer1.streamname:=mp3url;
mpegplayer1.open;//加个试试
mpegplayer1.Play;
end;
end;

 

J

jsxjd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-16

• #4

用播放器直接放是什么情况！~~

 

C

chatop

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-16

• #5

to:春意,
这个我加过，没用！！
to :jsxjd
用winamp，mediaplayer 7.1播放都没有问题

狂倒…

 

飘

飘摇客

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-16

• #6

调试看看mp3url是什么值？　然后使用ＭｅｄｉａＰｌａｙ打开看看地址是什么？

 

C

chatop

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-16

• #7

晕，我这样写了一个居然可以…

procedure TForm1.Button1Click(Sender: TObject);
begin
if opendialog1.Execute then
begin
mediaplayer1.filename:=opendialog1.FileName;
mediaplayer1.Open;
mediaplayer1.Play;
end;
end;

 

卡

卡色

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-16

• #8

//listboxtime.items=timetostr(now())
这是什么意思，mp3url不是等于一个时间字付串？

 

C

chatop

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-16

• #9

有两个listbox一个是listboxtime另一个是listboxfilename
time保存时间
filename保存文件路径
当listboxtime.items中的数值等于现在时间的时候，取出listboxfilename.items中的
文件路径交给medialplayer进行播放！！

我刚才试了mp3url的值，居然取出来的是空，那当然会出错，不知道上面的程序有什么不对的地方吗？
我查不出来………

 

C

chatop

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-16

• #10

mediaplayer1.filename:=listboxfilename.items[1];
mediaplayer1.Open;
mediaplayer1.Play;
这样也是可以的……………

 

飘

飘摇客

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-16

• #11

listboxtime.items=timetostr(now()) 　这个条件应该不会相等，你的mp3url:=listboxfilename.Items;不会执行。

 

C

chatop

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-16

• #12

问题解决了，少了一个break!!
谢谢大家的gz送分……