我想在 Delphi 11.1 Alexandra中左右滑动TListView对象中的一个项目。
我确实从标准手势中选择了左右手势,手势工作正常,但我无法确定到底是哪个项目滑动了。
procedure TTest.ListView1Gesture(Sender: TObject;
const EventInfo: TGestureEventInfo; var Handled: Boolean);
begin
Case EventInfo.GestureID of
sgiLeft :
begin
ListView1.Items.Delete(ListView1.Selected.Index);
end;
End;
end;
我确实尝试过使用ListView1.Selected.Index,但不幸的是,它不稳定,因为有时手势出现在选择事件之前。
我也尝试过使用ListView1.ItemIndex,但没有机会。
请帮助,如果你有任何想法如何获得刷过的项目索引。
谢谢
1条答案
按热度按时间bnl4lu3b1#
感谢雷米的回答。请看我的方法如下