Hola
O commit o CommitRetaining.
Código Delphi
[-] frmConeccion.Repuesto_vista_02.Locate('CODIGO', txt_arcodigo_repuesto.Text, []);
if frmConeccion.Repuesto_vista_02CODIGO.Text = txt_arcodigo_repuesto.Text then
begin
Application.MessageBox('Este código ya existe, debe crear otro para este registro.', 'Mensaje del sistema', MB_ICONINFORMATION or MB_OK);
Abort;
end
else
begin
frmConeccion.Repuesto_save2.Post;
frmConeccion.Repuesto_save2.commit; frmConeccion.Repuesto_save2.Refresh;
o
Código Delphi
[-] frmConeccion.Repuesto_vista_02.Locate('CODIGO', txt_arcodigo_repuesto.Text, []);
if frmConeccion.Repuesto_vista_02CODIGO.Text = txt_arcodigo_repuesto.Text then
begin
Application.MessageBox('Este código ya existe, debe crear otro para este registro.', 'Mensaje del sistema', MB_ICONINFORMATION or MB_OK);
Abort;
end
else
begin
frmConeccion.Repuesto_save2.Post;
frmConeccion.Repuesto_save2.CommitRetaining; frmConeccion.Repuesto_save2.Refresh;
Saludos