Uso del Stringgrid

[ecfisa]

Hola.

el problema lo ocasiona cuando guardo los datos en la grilla y le vuelvo a dar el foco al editor para seguir cargando datos

Intento comprender los pasos que estás siguiendo, aunque no sé si lo estoy logrando. Por que si al finalizar el código, le pasas el foco a otro componente, igualmente el StringGrid queda activo para insertar datos luego de hacer click sobre él.

Por ejemplo:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  fila: Integer;
begin
  fila:=StringGrid_imputacion.RowCount;
  StringGrid_imputacion.Cells[0, fila]:=Edit_imp_cod.Text;
  StringGrid_imputacion.Cells[1, fila]:=Label_imp_nombre.Caption;
  StringGrid_imputacion.Cells[2, fila]:=Edit_imp_desc.Text;
  StringGrid_imputacion.Cells[3, fila]:=FormatCurr('#########0.00', StrToFloat(sCurrencyEdit_imp_importe.Text));
  StringGrid_imputacion.RowCount:=fila + 1;
  Edit_imp_cod.SetFocus;  // <- Pasar el foco
end;

Saludos.