我在用mediaplayer组件做播放器,我使用用opendialog打开文件然后用filelistbox显示文件,并在listbox里选择文件播放,现在想这个代码怎么写啊,因为我自己只能让opendialog打开的文件在filelistbox中显示(打开多个文件也只显示一个),但通过listbox切换歌曲并播放就不行了,哪些知道告诉一下谢谢了
分就这么多了,没分了,不是我不诚心,帮帮忙谢谢!

解决方案 »

  1.   

    把路径添加到listbox,切换时,无非就是访问所选的内容,ListBox1.Items.Strings[ListBox1.ItemIndex]
      

  2.   

    我原来用的代码是
       filelistbox .Items .Add(ExtractFileName(OpenDialog2 .FileName));
    你的意思是不是变成lv1.ApplyFilePath(ExtractFileName(OpenDialog2 .FileName));
    如果是这样的话,每当打开文件就一下把目录下的所有文件添加进来了,我想做到只添加选中的文件
    还要楼上的能不能把ListBox1.Items.Strings[ListBox1.ItemIndex]详细代码用法给我,我太会谢谢!
      

  3.   

    OpenDialog本身就可以设置多选,你在那多选不就行了,用filelistbox 不是多余吗
    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;
      

  4.   

    我知道啊,问题是我想做成播放器列表啊,opendialog不是列表啊
    能解决吗?
      

  5.   

    opendialog,选择文件后,添加到listbox中
      

  6.   


    添加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],这个取得选择的文件路径,剩下的就是播放了
      

  7.   

    那  MediaPlayer1 .FileName  等于什么
       MediaPlayer1 .FileName:=  ????
    文件已经调到listbox里了,现在想直接在listbox里切换歌曲双击播放
      

  8.   


    ListBox1.Items.Strings[ListBox1.ItemIndex],这个取得选择的文件路径,剩下的就是播放了
      

  9.   

    我把ListBox1.Items.Strings[ListBox1.ItemIndex]放在onDblClick里对吗?
    问题是我现在不知道MediaPlayer1 .FileName  等于什么,你给的代码里面并没有给其赋值,我不知道该赋什么值。
      

  10.   

    人家说的是
    filelistbox。这些空间点点鼠标设置下就好了然后一句代码就可以了。