Property "Objects" im Stringgrid

[plautzer]

Hi,

ich habe nochmal ein paar um zu vergewissen das ich auf dem richtigen weg bin.

Meine erste Frage hierzu:

Delphi-Quellcode:

Tgrid = class(Tstringgrid)
    public

    TableName  : string;
  end;
Tzelle = class(tobject)
   private
   nr: integer;
   reihe: integer;
   editiert: boolean;
   end;

Ist das sinnvoll zwei objekte für das stringgrid zu wählen? Denn ich merk gerade das ich probleme habe, das grids nach dem zellenobjekt zu druchforsten:

Delphi-Quellcode:

for i := st_grid.FixedCols to st_grid.ColCount  do
    for j := st_grid.FixedRows to st_grid.RowCount  do
   if zelle.editiert = true then begin   //prüfen ob die zelle editiert wurde
        showmessage(inttostr(zelle.reihe));
      end;

und so wird sie deklariert:

Delphi-Quellcode:

procedure TForm1.zellenchange(ACol, ARow : integer;sgNr:tgrid ;editiert:boolean);
begin
    if sgNr.Objects[ACol, ARow] <> nil then
    (sgNr.Objects[ACol, ARow] as Tzelle).editiert := editiert;
end;
...
x:=(Sender as Tstringgrid).Col;
y:=(Sender as Tstringgrid).row;
zellenchange(x,y,Sender as Tgrid,true);

Ich alles mit einem Objekt 'tgrid' machen?