Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Tabla de Búsqueda (https://www.clubdelphi.com/foros/showthread.php?t=4116)

silviodp 02-10-2003 15:41:24

Tabla de Búsqueda
 
Hola a todos!!!

En mi aplicación tengo un formulario donde lleno datos que luego se grabarán en una tabla. En éste formulario tengo varios DBEdits donde se ingresa por ej. Nombre, Apellido, Fecha nac., etc.
Entre ellos tengo un DBEdit el cual toma datos de otra tabla la cual abro medinate un Click en un botón que esta a su lado.(las típicas ventanas de búsqueda).
El tema es que no sé como se hace para que me relacione las tablas, es decir, que el DBEDit en cuestión me tome el valor seleccionado de la tabla que se abrió, al hacer dobleclick sobre el registro que me interesa, por ejemplo.-
Espero que puedan ayudarme, saludos, gracias.

Silviodp.-

__cadetill 02-10-2003 15:45:51

si te interesa, en mi web tienes un componente hecho por un menda que precisamente hace esto. Si el componente en sí no lo quieres, como están los fuentes, puedes mirar la forma en que recupero el/los valor/es deseados

El componente es el TDbSearchDialog y mi web en la firma

Espero te sirva

sanxpue 02-10-2003 19:07:32

Cuando te vas a la ventana de busqueda...y le das supongamos <ENTER> al campo que quieres... regresas un indice y cierras el formulario, entonces a la hora de salir del formulario pones :

tabla.fieldbyname('nombre_campo').Value := Indice;

y con eso es todo ahora si mandas le das cerrar en el formulario de busqueda puedes poner un -1 y hacer un if

If Indice <> -1 Then
tabla.fieldbyname('nombre_campo').Value := Indice;

Asi le estas diciendo que no quieres ninguno..
espero haberme explicado

silviodp 02-10-2003 21:09:53

Cedetill voy a entrar a tu página y lo voy aver.
y en cuanto a la otra respuesta en verdad no entendí muy bien.
Gracias a ambos.-

Silviodp.-


La franja horaria es GMT +2. Ahora son las 18:31:08.

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