During today’s Delphi, C++Builder and RAD Studio 10 Seattle launch webinar, I got a question on how to add headers to TListView programmatically instead of using LiveBindings with a data source.
Here is a quick code snippet showing how to programmatically add TListView headers.
procedure TListViewHeaders.FormCreate(Sender: TObject);
var
Group, Item: Integer;
begin
for Group in [1..4] do
begin
with ListView1.Items.Add do
begin
Text := Format('Header %d', [Group]);
Purpose := TListItemPurpose.Header;
end;
for Item in [1..10] do
ListView1.Items.Add.Text := Format('Regular item %d.%d', [Group, Item]);
end;
end;
Reduce development time and get to market faster with RAD Studio, Delphi, or C++Builder.
Design. Code. Compile. Deploy.
Start Free Trial Upgrade Today
Free Delphi Community Edition Free C++Builder Community Edition
Design. Code. Compile. Deploy.
Start Free Trial Upgrade Today
Free Delphi Community Edition Free C++Builder Community Edition
