TListView如何获取多选时的。。。。

Question

单个选择时用ListView.Selected.SubItems.Strings[0]
选择TListView的多个项时，如何获取所选的所有文本

Answer 1

procedure TArrForm.UpdateClick(Sender: TObject);
var
  Item: TListItem;
begin
  Item := ViewList.Selected;
  while(Item <> nil) do
  begin
    Edit1.Text := Item.SubItems[1];  //看这里
    Edit2.Text := Item.SubItems[4];  //看这里
    Item := MainFrame.MP3List.GetNextItem(Item, sdAll, [isSelected]);
  end;
end;

Answer 2

Sorry,没改完全，应该是：procedure TForm1.Button1Click(Sender: TObject);
var
  Item: TListItem;
begin
  Item := ViewList.Selected;
  while(Item <> nil) do
  begin
    Edit1.Text := Item.SubItems[1];  //看这里
    Edit2.Text := Item.SubItems[4];  //看这里
    Item := ViewList.GetNextItem(Item, sdAll, [isSelected]);
  end;
end;