如何使用代码添加 TListBoxGroupHeader

Question

我有一个带有 TListBox 的 fmx 表单（C++ Rad Studio）。在设计时，我可以右键单击 ListBox，然后在项目编辑器中添加一个 GroupHeader。是否可以在代码中做到这一点，或者它只是设计时的一个选项？

谢谢， 罗斯

Answer 1

如果您的 TListBox 被称为“MyListBox”，您可以在 Delphi 中将它添加到列表的末尾：

var
  lListHeader: TListBoxGroupHeader;
begin
  lListHeader := TListBoxGroupHeader.Create(MyListBox);
  lListHeader.Parent := MyListBox;
end;