我在用mediaplayer组件做播放器,我使用用opendialog打开文件然后用filelistbox显示文件,并在listbox里选择文件播放,现在想这个代码怎么写啊,因为我自己只能让opendialog打开的文件在filelistbox中显示(打开多个文件也只显示一个),但通过listbox切换歌曲并播放就不行了,哪些知道告诉一下谢谢了
分就这么多了,没分了,不是我不诚心,帮帮忙谢谢!
分就这么多了,没分了,不是我不诚心,帮帮忙谢谢!
filelistbox .Items .Add(ExtractFileName(OpenDialog2 .FileName));
你的意思是不是变成lv1.ApplyFilePath(ExtractFileName(OpenDialog2 .FileName));
如果是这样的话,每当打开文件就一下把目录下的所有文件添加进来了,我想做到只添加选中的文件
还要楼上的能不能把ListBox1.Items.Strings[ListBox1.ItemIndex]详细代码用法给我,我太会谢谢!
var
i:integer;
begin
OpenDialog1.Options := OpenDialog1.Options + [ofAllowMultiSelect];
if OpenDialog1.Execute then
begin
for i := 0 to OpenDialog1.Files.Count - 1 do
begin
ShowMessage(OpenDialog1.Files.Strings[i]);
end;
end;
end;
能解决吗?
添加var
i:integer;
begin
OpenDialog1.Options := OpenDialog1.Options + [ofAllowMultiSelect];
if OpenDialog1.Execute then
begin
for i := 0 to OpenDialog1.Files.Count - 1 do
begin
ListBox1.Items.Add(OpenDialog1.Files.Strings[i])
end;
end;
end;打开
ListBox1.Items.Strings[ListBox1.ItemIndex],这个取得选择的文件路径,剩下的就是播放了
MediaPlayer1 .FileName:= ????
文件已经调到listbox里了,现在想直接在listbox里切换歌曲双击播放
ListBox1.Items.Strings[ListBox1.ItemIndex],这个取得选择的文件路径,剩下的就是播放了
问题是我现在不知道MediaPlayer1 .FileName 等于什么,你给的代码里面并没有给其赋值,我不知道该赋什么值。
filelistbox。这些空间点点鼠标设置下就好了然后一句代码就可以了。