Du kannst einfach ganze Objecte in einer Zelle speichern.
Delphi-Quellcode:
Type TMyObject = class(TObject)
private
Editable : boolean;
end;
procedure AddObjectToGrid(ACol, ARow : integer; Editable : boolean);
var
MyObject : TMyObject;
begin
MyObject := TMyObject.Create;
MyObject.EditAble := EditAble;
Stringgrid1.Objects[ACol, ARow] := MyObject;
end;
function TestForEdit(ACol, ARow):boolean;
var
MyObject : TMyObject;
begin
MyObject := TMyObject(Stringgrid1.Objects[ACol, ARow]);
result := MyObject.EditAble;
end;
Nur mal so als Beispiel.....
PS : Nicht vergesen die Objekte wieder Freizugeben !