delphi - TListbox - OnChangeEvent 在多选时触发不可靠

Question

我正在使用 XE7 和 FMX。

我的问题是 TListbox 的 OnChange-Event 无法正确处理多选(它不会在每次发生更改时触发)。

重现步骤:

• 创建一个 FMX 应用程序并将 TListbox 添加到其表单中。
• 将项目添加到此列表框。
• 将列表框的“MultiSelectStyle”设置为“默认”。
• 处理 OnChangeEvent(设置断点或执行某些操作...)。
• 现在运行项目并单击第一个 Item -> OnChange 被执行。
• 但如果第一个项目被再次单击，则 OnChange 将不会被执行。

可以告诉我如何解决这个问题，这样每次选择更改时我都会收到一个事件。

Answer 1

来自文档 FMX.ListBox.TCustomListBox.OnChange :

Occurs when the selection in the list box changes. Write an OnChange event handler to take specific action immediately after a new item or items are selected in the list box.

使用 OnClick 或 OnItemClick 事件来监视用户何时重新选择相同的选择。并为所有新选择保留 OnChange 处理程序。