Как в TListView поменять местами 2 Itema?

← →
vlv © (2002-01-23 18:37) [0]

Как в TListView поменять местами 2 Itema?
Св-во Index - ReadOnly, никаких методов управления позицией я не нашел ни в TListView, ни в TListItem, ни в TListItems

← →
ggrisha (2002-01-24 10:30) [1]

Держи пример.

procedure TForm1.Button1Click(Sender: TObject);
var t:TListItem;
begin
t:=TListItem.Create(ListView1.Items[1].Owner);
t.Assign(ListView1.Items[1]);
ListView1.Items[1]:=ListView1.Items[0];
ListView1.Items[0]:=t;
end;

Как в TListView поменять местами 2 Itema? Найти похожие ветки