Jak obsluzyc multiselect w Tlistview ?

Rejestracja:około 21 lat
Ostatnio:około 17 lat

Jak zrobic by z jednej llisty1 typu Tlistview przeniesc kilka zaznaczonych elementow do drugiej listy2 typu tlistview ???? Jednym slowem jak obsluzyc te multiselect ??? Trzeba to zrobic w jakiejs petli ???

nazgul

2004-05-06 17:22

nazgul2004-05-06 17:22

Rejestracja:około 21 lat
Ostatnio:około 17 lat
Postów:24

Kopiuj

for i:= 0 to ListView1.SelCount-1 do
Begin
  //jakieś instrukcje np. Listview.Items[i].
end;

Ktos

2004-05-06 18:13

Ktos2004-05-06 18:13

Moderator

Rejestracja:prawie 23 lata
Ostatnio:około 23 godziny

nie jestem pewien, ale TListView.Selected może sprawdź?

pq

2004-05-06 18:28

pq2004-05-06 18:28

Rejestracja:około 23 lata
Ostatnio:około 14 lat

F1 !!!!!!

Przykład z hepa pod ListView.GetNextItem

Kopiuj

procedure TForm1.Button1Click(Sender: TObject);

var
  Item: TListItem;
begin
  Item := ListView1.Selected;
  while Item <> nil do
  begin
    ListBox1.Items.Add(Item.Caption);
    Item := ListView1.GetNextItem(Item, sdAll, [isSelected]);
  end;
end;