Para hacer Master-Detail entre dos Querys sigue este ejemplo tomado de un Libro de Marco Cantù.
Cita:
El truco procede del Libro de Marco Cantù - "Delphi 6" página 587. en su versión en español. Parte III - Progamación de Bases de Datos.
Para los que no tengan el libro.
Consiste en realizar una relación maestro detalle entre dos Querys, obviamente tendrán un campo en común.
Para el ejemplo podemos utilizar el alias DbDemos que viene con Delphi para los ejemplos.
Necesitamos 2 Tquerys 2 TdataSource y 2 rejillas para comprobar que todo funciona correctamente.
Yo he utilizado para la Query1 la tabla Customer y en el Sql del Tquery he escrito:
Select * From Customer
A este Query conecto el TdataSource1 y a este la primera Rejilla.
EL CAMPO EN COMUN ES: CusTNo
En el segundo Query escribo.
Select *
from orders
Where CustNo = :CustNo
Este parámetro al llamarse igual que el campo es el que hace que funcione la relación maestro detalle.
Esto lo dice Marco Cantù, pero las tablas las he elegido yo para hacer la prueba y va perfectamente.
Ojo el DataSource del Query2 será tambien el DataSource1.
|
Lo he sacado de otra pregunta similar que contesté en otra ocasión.
Un Saludo.