Delphi 2010 : Group TListView items in vsReport ViewStyle

首先这可能吗？

我有两个问题-第一个问题是，在运行时创建组时，无法使组出现在TListView中。我正在使用以下代码:

lg := lvResults.Groups.Add;
lg.Header := 'New Starters';
lg.GroupID := 0;

第二个是即使我在设计时创建组-在窗体设计器中也可以看到它们-运行时不存在它们-甚至在刷新数据以添加自己的项目之前...

额外的:
我已确认以下答案可用于原始项目。但是，它在我要使用它的项目中失败了!我已经用调色板中的新TListView替换了TListView，这并不令人高兴。 ListView 位于tpageControl上

最佳答案

下面的代码导致可见的组。您可能会忘记将GroupView设置为True吗？

procedure TMyForm.FormCreate(Sender: TObject);
var
  Group: TListGroup;
  Item: TListItem;
begin
  ListView1.ViewStyle := vsReport;
  ListView1.GroupView := True;
  ListView1.Columns.Add.Caption := 'My column';
  Group := ListView1.Groups.Add;
  Group.Header := 'My header';
  Item := ListView1.Items.Add;
  Item.GroupID := Group.GroupID;
  Item.Caption := 'My item';

Delphi documentation中有一个代码示例。

关于Delphi 2010 : Group TListView items in vsReport ViewStyle，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/6452325/