Лидеры

А можно ещё так: ListView1.Items[0].Index := 1; ListView1.Items[1].Index := 0; ListView1.Items.Sort(TComparer<TListViewItem>.Construct( function(const ALeft, ARight: TListViewItem): Integer begin Result := ALeft.Index - ARight.Index; end)); Поменять-то поменяет, только на сколько обоснован вызов Sort в этой ситуации - решать Вам.

В общем, сделал пока вот так: var Source: TListViewItem; Target: TListViewItem; begin ListView1.BeginUpdate; Source := ListView1.Items[0]; Target := ListView1.Items.Insert(1); Target.Text := Source.Text; Source.Text := ListView1.Items[2].Text; ListView1.Items.Delete(2); ListView1.EndUpdate; end; В этом случае придется вручную копировать содержимое каждого итема. Кому интересно, вот тестовый проектик с перетаскиванием итемов мышью Demo.zip Ну а если кто может предложить вариант получше, не стесняйтесь