Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 23-02-2004
silviodp silviodp is offline
Miembro
 
Registrado: may 2003
Ubicación: General Levalle, Argentina
Posts: 277
Poder: 22
silviodp Va por buen camino
Tabla de búsqueda

Si yo tengo 2 tablas Paradox7, y defino mediante el Diseñador de Modulo de Datos en la solapa de Diagrama de datos un campo de búsqueda, entre las dos tablas, tal que para completar un campo de una busque en la otra los datos, siempre se debe usar (luego en mi programa) un DBLookUpComboBox para ver los datos de la tabla de búsqueda?, por que yo quiero poner un Speed Button tal que en el evento Onclick del mismo habra la tabla de búsqueda en un DBGrid y al hacer doble click sobre un registro de ésta me complete los datos en el campo de la otra.
Si alguien me puede dar una idea de como puedo hacerlo.
Son las típicas tablas de búsqueda que tiene cualquier aplicación.
Gracias.
Responder Con Cita
  #2  
Antiguo 23-02-2004
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Poder: 10
marcoszorrilla Va por buen camino
Creo que lo que quieres, si interpreto bien tu mensaje quedaría mejor de la siguiente manera.

En la rejilla pulsas botón derecho y abres el editor de columnas añades los campos necesarios y sobre el que quieras que te abra el segundo formulario pones en su propiedad ButtonStyle : cbsEllipsis
Esto hará que al entrar en esta columna en modo edición aparezca un botón con tres puntos que al pulsarlo mediante el evento "ut infra" referenciado te abrirá el segundo formulario:
Código:
procedure TfrCompras.GrLineasEditButtonClick(Sender: TObject);
begin
Application.CreateForm(TfrDlgProducto, frDlgProducto);
frDlgProducto.ShowModal;
end;
Lo abrimos en forma modal y en el evento DobleClic de la rejilla que tendremos en este segundo formulario por ejemplo con los precios de los productos actualizaremos el DataSet del primero:

por ejemplo:

FacturaProducto.Value:=ProductoNombre.Value;
FacturaPrecio.Value:=ProductoPrecio.Value;
....

Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita
  #3  
Antiguo 24-02-2004
silviodp silviodp is offline
Miembro
 
Registrado: may 2003
Ubicación: General Levalle, Argentina
Posts: 277
Poder: 22
silviodp Va por buen camino
Tabla de búsqueda

Sí eso es más o menos lo quiero hacer, pero no quiero levantar la otra tabla desde el DBGrid de la primera, sino que de un botón que esté al lado de un DBEdit y que al hacer doble click sobre el DBGrid que se abre me guarde la información en el DBEdit y por lo tanto lo hará en el campo que está relacionado con éste.
Me explico?, espero me entiendan.
Gracias.
Responder Con Cita
  #4  
Antiguo 24-02-2004
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.254
Poder: 28
jachguate Va por buen camino
Pues la solución es exactamente la misma... solo cambian los eventos en los que se dispara el otro formulario... no?
__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita
  #5  
Antiguo 24-02-2004
silviodp silviodp is offline
Miembro
 
Registrado: may 2003
Ubicación: General Levalle, Argentina
Posts: 277
Poder: 22
silviodp Va por buen camino
Tabla de búsqueda

Es lo mismo?, pero si yo tengo la tabla de búsqueda: Producto con los campos CODIGO DESCRIPCION y quiero que se vea (cuando hago doble click en el DBGrid de la tabla de búsqueda) por ej. la Descripción del producto en el DBEdit pero quiero que guarde en la tabla el Código del mismo, como tengo que hacerlo de la forma que yo quiero??
Gracias.
Responder Con Cita
  #6  
Antiguo 24-02-2004
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.254
Poder: 28
jachguate Va por buen camino
Es que el valor lo almacenas en el Campo del dataset asociado al DBEdit, DBGrid, DBText o lo que querras... de manera que este (gracias a la VCL) se actualiza automáticamente (o mágicamente, como querras verlo).

Cita:
Empezado por MarcosZorrilla
FacturaProducto.Value:=ProductoNombre.Value;
FacturaPrecio.Value:=ProductoPrecio.Value;
....
Hasta luego.

__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita
  #7  
Antiguo 24-02-2004
silviodp silviodp is offline
Miembro
 
Registrado: may 2003
Ubicación: General Levalle, Argentina
Posts: 277
Poder: 22
silviodp Va por buen camino
Tabla de Búsqueda

Entonces en definitiva no tengo que usar el el Diagrama de datos para relacionar las tablas??, pero el ejemplo que Ud. me dan en realidad no almacena el código en la tabla sino el nombre, como escribí antes quiero relacionar las tablas de tal forma que me guarde el Código en el campo de la tabla pero que me deje ver en el componente el Nombre o Descripción.
Esto yo sé que se puede hacer con un DBLookUpComboBox pero si la tabla de búsqueda es muy grande sería muy lento encontrar lo que estoy buscando por lo tanto lo que quiero es abrir la tabla de búsqueda con un DBGrid, hacer doble click...,etc. (lo que ya expliqué antes).
No sé si me entienden...
Saludos, gracias.
Responder Con Cita
Respuesta



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 23:19:46.


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
Copyright 1996-2007 Club Delphi