Hola FAGD, yo lo haría de esta forma.
Digamos que para aumentar una fila lo haces así
Código Delphi
[-]
StringGrid1.RowCount := StringGrid1.RowCount+1;
NuevaFila := StringGrid1.RowCount-1;
y para no permitirle escribir solo en esa fila:
Código Delphi
[-]
procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
ARow: Integer; var CanSelect: Boolean);
begin
if ARow=NuevaFila then
StringGrid1.Options := StringGrid1.Options + [goEditing]
else
StringGrid1.Options := StringGrid1.Options - [goEditing];
end;
Saluditos