我正在使用带有标准Tlistview vcl的delphi 10.1
生病尝试和exmple更好,但不是很擅长那个对不起好吧说我有标准的listview
按照以下顺序包含项目
现在我有两个按钮前后按下前进按钮它将获得Ken White列表中的第一个项目,如果我一直按下按钮,它将沿着列表向下直到它到达simon或最后一个条目
现在它的后退按钮也是如此,但它会反过来从底部到顶部,直到它回到Ken White。
对不起,如果它没有多大意义拼写不是我的东西chaps抱歉我是阅读障碍
答案 0 :(得分:0)
要在:
中继续前进,您可以使用GetNextItem
。
TListView
在上面,'sdAll'指定下一个项目的索引比已经选择的项目高一个。没有选定项目时,此方法选择第一个项目。当已选择最后一项时,将在呼叫返回后取消选择。
要反方向,如果合适,你可以传递'sdLeft'或'sdAbove'而不是'sdAll'。如果没有,因为没有'GetPreviousItem',你必须编写代码来选择索引低于已选项的项。例如:
ListView1.Selected := ListView1.GetNextItem(ListView1.Selected, sdAll, []);
如果你想要不同的行为,你可能需要修改代码,例如当选择了最后一个项目并且你向前推进时你不希望发生任何事情。