Gibts eine schnelle TStringList mit Spalten?

[Satty67]

In C# bin ich dabei mit ein ObjectTable als Basis für ein nachgebautes StringGrid zu entwerfen. Das ist genauso leicht in Delphi realisierbar.

Es ist im Prinzip eine einfach Klasse mit dem Member
FObjectColumns = array of TObjectList; .
auf Strings spezialisiert könnte man
FStringColumns = array of TStringList nehmen.

Dabei ist jede Spalte eine TStringlist, lässt sich sehr einfach verwalten und um weitere Spalten erweitern. Zugriff erfolgt wie bei StringGrid via

Delphi-Quellcode:

function Cell(row, column : Integer): String;
begin
  sl := FStringColumns[column];
  result := sl[row];
end;

Also zumindest eine Basis-Funktionalität mit Get/SetCell und dynamischer Anpassung der Reihen/Spalten ist recht fix gemacht

PS: Wenn es interessant ist, kann ich heute Abend schnell eine Basisklasse schreiben, die Logik kann ich ja aus dem fertigen Code in C# übernehmen und muss nicht mehr viel dabei denken...