Hola
Das pocos datos, seria interesante ver algo mas del problema, la parte que pones no le veo nada con relacion al problema.
Salvo unos detalles, no se cual es el problema, nos explicas mas?
Código Delphi
[-]
procedure TFrmProductos.DBErefsubpdtoKeyPress(Sender: TObject;
begin
if key = #13 then
DmSip.TblProductoSub.post;
DBNEnsamblado.SetFocus;
end;
Algunas cosas sobran.
Saludos