Wenn das nur "angezeigt" werden soll, dann einfach selber auf einen Canvas malen oder eben einem TDrawGrid eine Zeichen-Methode unterjubeln.
Bau dir eine Klasse, der du die Daten übergeben kannst (das sind in deinem Falle ja Spalten mit jeweils 2 Werten)
Delphi-Quellcode:
TDataItem = class
property Percent : Double;
property Title : string;
end;
TDataColumn = class
property Title : string;
property Items : TList<TDataItem>;
end;
TDataContainer = class
property RowTitle : TList<string>;
property Columns : TList<TDataColumn>;
end;
und jetzt noch einen Presenter, der so einen DataContainer in einem Control anzeigen kann. Mit einem abstrakten Presenter würde ich anfangen und davon alle benötigten (für StringGrid, ListView, DrawGrid, VST) ableiten.
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)