Hola Efren2006.
Cita:
Empezado por Efren2006
...
Solo me pasa cuando trato de INCLUIR un registro y si el usuario cancela ejecuto el evento .. 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
...
procedure TForm.IBDataSet1BeforeInsert(DataSet: TDataSet);
begin
FBookMark := DataSet.GetBookmark;
end;
procedure TForm.IBDataSet1AfterCancel(DataSet: TDataSet);
begin
DataSet.GotoBookmark(FBookMark);
DataSet.FreeBookmark(FBookMark)
end;
...
Saludos