Problema al Insertar un Registro en una Tabla

ecfisa · #7 15-09-2016

Hola Efren2006.

Cita:

Empezado por Efren2006

...
Solo me pasa cuando trato de INCLUIR un registro y si el usuario cancela ejecuto el evento

Código Delphi [-]CANCEL

.. se mueve
...

Es un comportamiento del TIBDataSet...

Una solución para tu caso es:

Código Delphi [-]...
type
  TForm = class(TForm)
    IBDataSet1: TIBDataSet;
    ...
    procedure IBDataSet1AfterCancel(DataSet: TDataSet);
    procedure IBDataSet1BeforeInsert(DataSet: TDataSet);
    ...
   private
     FBookMark: Pointer; 
   ...

implementation

...
// TIBDataSet - BeforeInsert
procedure TForm.IBDataSet1BeforeInsert(DataSet: TDataSet);
begin
  FBookMark := DataSet.GetBookmark;
end;

// TIBDataSet - AfterCancel
procedure TForm.IBDataSet1AfterCancel(DataSet: TDataSet);
begin
  DataSet.GotoBookmark(FBookMark);
  DataSet.FreeBookmark(FBookMark)
end;
...

Saludos

Temas Similares
Tema	Autor	Foro	Respuestas	Último mensaje
Problema al insertar un registro a una tabla	egostar	Firebird e Interbase	8	09-08-2008 01:34:29
como insertar un registro en dos tabla	kurono	Varios	13	27-05-2008 02:49:48
Insertar registro en una tabla	efelix	Conexión con bases de datos	21	05-12-2006 18:13:50
Insertar un registro en una tabla Paradox	maravert	Tablas planas	1	14-10-2005 02:08:02
Insertar registro en tabla	jzk	Conexión con bases de datos	15	26-05-2004 18:58:19