各位大侠:
    我是菜鸟,请问个很菜的问题:
    我窗体上有opendialog、listview、button各一个,opendialog中mulselect:=true;我想单击按钮把opendialog中多选的文件名称加入到listview中,不知道如何写!
   请各位帮帮忙~!谢谢了!~
   最好有代码~~!^_^

解决方案 »

  1.   

    procedure TForm1.Button1Click(Sender: TObject);
    var MyListItem:TListItem;
    begin
        if opendialog1.Execute then
        begin
            MyListItem:=TListItem.Create(nil);
            MyListItem:=ListView1.Items.Add;
            MyListItem.Caption:=OpenDialog1.FileName;
        end;
    end;
      

  2.   

    没找到搂住所说的opendialog中mulselect:=true;属性
    倒是在listView里面发现了MultiSelect属性,搂住给解释一下吧...
      

  3.   

    先设置opendialog中mulselect:=true;属性
    再写下面代码就可以啦
    if opendialog1.Execute then
          listbox1.Items :=opendialog1.Files ;
      

  4.   

    设置ListView1的
    ////////////
    procedure TForm1.Button1Click(Sender: TObject);
    var
      iCount:Integer;
    begin
      if OpenDialog1.Execute then
      begin
        for iCount:=0 to OpenDialog1.Files.Count-1 do
        begin
          with ListView1.Items.Add do
          begin
            caption:=OpenDialog1.Files[iCount];
          end;
        end;
      end;
    end;