Property "Objects" im Stringgrid

[Nightshade]

Warum erstellst du in der Neuen Zeile nicht direkt die Objekte ?

Delphi-Quellcode:

procedure TfrmArtNrEin.ErzeugeNeueZeile(Sender: TObject); 
var
  t : integer;
begin 
  with Sender as TStringgrid do begin 
    WertSpeichern; 
    NeueZeile := true;    // besetzen von Col und Row ruft SelectCell auf !! 
    Col := 1;             // das sgArtNr.Objects darf hier nicht verändert werden 
    RowCount := RowCount + 1; 
    Row := RowCount - 1; 
    for t := 0 to pred(rows.Count) do       // Direkt für jede Zelle ein Objekt erstellen.
       AddEditObjectToGrid(t, Row, true);
    NeueZeile := false;   // hier wieder SelectCell einschalten 
  end; 
end;