![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#3
|
|||
|
|||
|
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.... |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|