Hola...
Una opcion para tu problema seria utilizando el Objeto Bookmark. Primero tienes que agregar a tu clausula Uses: DB.
el codigo seria el siguiente: en el Evento AfterPost de tu Tabla le agregas el siguiente Codigo:
var
Marca : TbookMark;
begin
with DataSet do
begin
DisableControls; // Desactivamos los Controles para evitar los Gaps
Marca := GetBookMark; // Apuntamos al Registro que hemos Insertado
Close; // Cerramos y Abrimos el DataSet
Open;
GoToBookmark(Marca); // Vamos al Registro Previamente Marcado
EnableControls; //Activamos Los Controles otra Vez
FreeBookmark(Marca); // Liberamos la Marca en Memoria
End;
End;
Espero que te sirva
__________________
El conocimiento es un Patrimonio Universal....
|