Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   ApplyUpdates da un error 'Unsupported feature' en Delphi 2009 (https://www.clubdelphi.com/foros/showthread.php?t=71719)

chiche_s 06-01-2011 02:53:32

ApplyUpdates da un error 'Unsupported feature' en Delphi 2009
 
Saludos a todo aquel que lea este mensaje.

He estado practicando con la versión 2.5 de Firebird y siguiendo un tutorial del blog de Delphi al límite hice una pequeñísima aplicación de mantenimiento de clientes. Pero me encontré con un gran inconvieniente. La versión 2009 de Delphi se "rehúsa" :mad: a trabajar con los componentes TClientDataSet ya que cuando quiero hacer una actualización de los datos de un cliente, si lo ejecuto desde el IDE arroja el error del título, e inmediatamente después, el siguiente:

Project Project1.exe raised exception class EDatabaseError with message 'TClientes: Must apply updates before refreshing data'.

El código que utilizo es el siguiente:

Código Delphi [-]
// Llamo al formulario para la modificación de datos del cliente
procedure TFClientes.BitBtn2Click(Sender: TObject);
begin
  LogicaNegocio.TClientes.Params.ParamByName('id').AsString:= LogicaNegocio.TLstClientesIDCLIENTE.AsString;
  LogicaNegocio.TClientes.Open;
  LogicaNegocio.TClientes.Edit;
  Application.CreateForm(TFCliente, FCliente);
  FCliente.ShowModal;
  LogicaNegocio.TClientes.Close;
  ListadoClientes.SetFocus
end;


Código Delphi [-]
// Acepto las modificaciones realizadas
procedure TFCliente.BitBtn1Click(Sender: TObject);
begin
  LogicaNegocio.TClientes.Post;
  ModalResult:= mrOk
end;


Código Delphi [-]
// Actualizo el DBGrid con los nuevos datos si los hay
procedure TLogicaNegocio.TClientesAfterPost(DataSet: TDataSet);
begin
  if TClientes.ChangeCount>0 then
    begin
      TClientes.ApplyUpdates(0); // Aquí explotan las excepciones
      TClientes.Refresh;
      if TClientes.Active then
        TLstClientes.Refresh
    end;
end;


Desde ya será muy bien recibida cualquier ayuda.


La franja horaria es GMT +2. Ahora son las 06:16:34.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi