Hallo Michael,
eigentlich brauchst du eher eine StringList als Child und nicht eine StringList mit Children. Du kannst die StringList mit den Werten einer Zeile als Item einer ObjectList verwalten:
Delphi-Quellcode:
type
TRecordList = class(TObjectList)
private
function GetField(col, row: Integer): String;
procedure SetField(col, row: Integer; value: String);
public
property Field[col, row: integer]: String read GetField write SetField;
end;
Der Zugriff geschieht dann über einen zweistufigen Index:
Delphi-Quellcode:
procedure TDemoForm.CellEditExecute(Sender: TObject);
var
s: String;
begin
with StringGrid do
begin
s := RecordList.Field[Col, Row];
if InputQuery('Edit Cell', Format('Col %d Row %d', [Col, Row]), s) then
RecordList.Field[Col, Row] := s;
end;
end;
Grüße vom marabu