Este es mi procedimiento en el boton de guardar corrijanme ya que no he logrado refrescar los datos sin tener que cerrar toda la aplicación.
Código Delphi
[-]
procedure TFrmProveedores.Button1Click(Sender: TObject);
begin
if Application.MessageBox('¿Desea Agregar Otro?', 'Confirmación',
MB_ICONQUESTION OR MB_YESNO) = ID_NO then
begin
dmacceso.cdsProveedores.Applyupdates(0);
Main.FrmPrincipal.iCloseClick(FrmProveedores);
Close;
end
else
Begin
dmacceso.cdsProveedores.Active := False;
dmacceso.cdsProveedores.Active := True;
dmacceso.cdsProveedores.ApplyUpdates(0);
dmacceso.cdsProveedores.Last;
dmacceso.cdsProveedores.Insert;
end;
end;
utilizo directamente dbEdit mi conexion es dbexpress. y mi base da datos firebird.
Saludos