delphi - 在 Delphi 中，如何使按钮出现在 TCheckListBox 的顶部？

Question

我们想要一个带有复选框和格式化文本的列表框。我们使用TCheckListBox所有者绘制模式来实现这一点。

但我们还希望在所选行的右端出现一个按钮。仅添加一个带有 CheckListBox 的按钮 ( TSpeedButton) 作为 Parent 并不能正确绘制。

有谁知道如何做到这一点？