manejo del navegador

[esimon]

muy buena noche para todos, disculpa si el titulo no se aclara muy bien con la descripcion de mi problema.

voy a tratar de explicar lo que tengo y lo que quiero, lo primero es que trabajo en delphi 7 y access.

tengo un fom donde capturo los datos estoy usando 3 tablas, hoteles que es la tabla donde almaceno todos los datos, provincia y localiad, en esta dos tablas muestro el Numero y la Descripcion tando de la Provincia como de la Localidad. usando dos DBEdit para los Numero de la proncia y de la Localidad y dos DBLookupComboBox para la descripcion tanto de la proncia como de la localidad, aqui uso una relacion, entre provincia y localidad, porque la provincia puedes tener barias localidades, esto hace que cuando yo selecciono en el DBLookupComboBox1 una provincia, en el DBLookupComboBox2 solo me muestra las localidades de esta provincia.

el problema esta aqui, en el fom tengo un navegador para moverme, en mucha ocaciones no me muestra la descripcion de la localidad que tiene el DBEdit, pero si me esta grabando el numero que corresponde a esa descripcion.

pregunta hay alguna forma donde yo le diga al navegador que cuando se este moviendo me lea el numero que esta el puntero y me traiga la descripcion que corresponde a ese numero.

espero que me disculpen por lo extensa de la nota y pueden comprender mi inquitud.

mil gracias

[[Lepe]]

Por navegador, pensé que era navegador web. Según entiendo es un TDBNavigator.

Si es así, puedes usar el dataset asociado, en concreto el evento AfterScroll que se produce cuando te mueves entre registros.

Es probable que necesites algo así:

Código Delphi [-]
if not tabla1.state in dsEditModes then
 TraerDescripcion;

Saludos

[esimon]

gracias lepe por la informacion, pero espero que me disculpe no entiendo esa rutina que me enviaste.

[[Lepe]]

Los TAdoTables, TTables, etc, tienen un evento llamado AfterScroll, como su nombre indica ocurre cada vez que te mueves de un registro a otro del TTable.

El DBNavigator es un control que permite moverte entre registros, por ende, cada vez que pulsas un botón del DBNavigator, hará que se lance el evento AfterScroll de esa misma tabla.

En tu tabla asociada al navegador, doble clic en el inspector de objetos al evento AfterScroll:
[dephi]
dblookupComboLocalidades.keyValue := AdoTable1.Fieldbyname('codLocalidad').Value;
dblookupComboProvincia.Keyvalue := AdoTable1.Fieldbyname('codProvincia').Value;
[/delphi]

Lo que hago, es que cada vez que te muevas de registros, le dices a los LookUpcombos qué código de localidad debe estar activo.

¿qué es AdoTable1?
Tienes un DBedit donde escribes el número de localidad y provincia, ese DBEdit estará asociado a un AdoTable, pues ese AdoTable es el que me refiero.

Saludos