如何使用鼠标滚轮在 TValueListEditor 上滚动选择列表?
How to scroll the picklist on a TValueListEditor with the mousewheel?
默认情况下,鼠标滚轮将更改 TValueListEditor 上的行。当我有一个选择列表时,我更希望鼠标滚轮滚动显示的列表。我知道如何覆盖默认行为,但我如何获得对控制下拉列表显示的对象的访问权限,以便我可以让它滚动?
TValueListEditor
具有 InplaceEditor
和 EditList
属性,return 指向 TInplaceEditList
对象的指针(InplaceEditor
属性 return 是一个 TInplaceEdit*
指针,您可以将其类型转换为 TInplaceEditList*
)。这两个属性都声明为 protected
,因此您必须使用访问器来访问它们,或者从 TValueListEditor
派生,以便提高它们的可见性。
在任何一种情况下,TInplaceEditList
都有一个 public PickList
属性 return 是指向 TCustomListBox
对象的指针(它是实际上是 TPopupListBox
).
默认情况下,鼠标滚轮将更改 TValueListEditor 上的行。当我有一个选择列表时,我更希望鼠标滚轮滚动显示的列表。我知道如何覆盖默认行为,但我如何获得对控制下拉列表显示的对象的访问权限,以便我可以让它滚动?
TValueListEditor
具有 InplaceEditor
和 EditList
属性,return 指向 TInplaceEditList
对象的指针(InplaceEditor
属性 return 是一个 TInplaceEdit*
指针,您可以将其类型转换为 TInplaceEditList*
)。这两个属性都声明为 protected
,因此您必须使用访问器来访问它们,或者从 TValueListEditor
派生,以便提高它们的可见性。
在任何一种情况下,TInplaceEditList
都有一个 public PickList
属性 return 是指向 TCustomListBox
对象的指针(它是实际上是 TPopupListBox
).