选中filelistbox里面的文件名:
  ShowMessage(FileListBox1.Items[FileListBox1.itemindex]);
可以读取文件名,与listbox的用法一致

解决方案 »

  1.   

    FileListBox1.Items.Strings[i];看看下面的例子
    var  F: File;
      i: Integer;
    begin
      for i := 0 to (FileListBox1.Items.Count - 1) do begin
      try
        if FileListBox1.Selected[i] then 
        begin
          if not FileExists(FileListBox1.Items.Strings[i]) then begin
            MessageDlg('File: ' + FileListBox1.Items.Strings[i] + 
                       ' not found', mtError, [mbOk], 0);
            Continue;
          end;
          AssignFile(F, FileListBox1.Items.Strings[i]);      Reset(F, 1);
          ListBox1.Items.Add(IntToStr(FileSize(F)));
          CloseFile(F);
        end;
       finally
       { do something here }
       end;
      end;
    end;