pasar de edit a dbgrid

[edgar_prospero]

ya cambie aqui el componente en lugar de un dbgrid ahora estoy usando un stringgrid y quiero agregarle datos mediante un edit al darle enter la primera vez si lo logro y me manda la informacion pero la segunda vez la manda pero me sustituye el valor que ya tenia y lo que quiero es que los vaya poniendo como en una lista a continuacion pongo el codigo que estoy usando para tal cosa a ver si me pueden ayudar

Código Delphi [-]
procedure TForm2.codigoKeyPress(Sender: TObject; var Key: Char);

begin

STRINGGRID1.Cells[STRINGGRID1.Col,STRINGGRID1.Row]:=codigo.Text;

end;