在Delphi中，如何使按钮显示在TCheckListBox的顶部？

我们需要一个带有复选框和格式化文本的列表框。在所有者绘制模式下，我们使用

TCheckListBox

来获得它

但是我们也希望在所选行的右端显示一个按钮。仅添加一个带有复选框的按钮（

TSpeedButton

），因为父项无法正确绘制

---

有人知道怎么做吗？

也画按钮。处理控件中的输入事件以响应被按下的控件。您应该在q中包含一个MCVE（），以显示您正在做什么。