Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > Firebird e Interbase
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

 
 
Herramientas Buscar en Tema Desplegado
  #3  
Antiguo 16-03-2004
Jvilomar Jvilomar is offline
Miembro
 
Registrado: mar 2004
Ubicación: Republica Dominicana
Posts: 97
Poder: 23
Jvilomar Va por buen camino
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....
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 18:37:03.


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