Delphi Cookbook - Third Edition

How it works...

After reading the JSON using the TRESTClient component, in the parsing code, we added controls to each item to represent the three columns we require. You cannot add every kind of control to the TListViewItem component; we can only add those that inherit from TListItemDrawable. However, you can inherit your own class from TListViewItem to implement all the advanced visualizations you require.

The relevant part about the customization happens in the ListView1UpdateObjects method:

procedure TMainForm.ListView1UpdateObjects( 
  const Sender: TObject; 
  const AItem: TListViewItem); 
var 
  AQuarter: Double; 
  lb: TListItemText; 
  lListView: TListView; 
begin lListView := Sender as TListView; //different item purpose, different customization. ...