<html>
<head>
<style><!--
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 12pt;
font-family:Calibri
}
--></style></head>
<body class='hmmessage'><div dir='ltr'>Hola es muy sencillo, debes tener los datasets asociados a cada dbgrid, entonces al query2 en su propiedad datasource le vas a asignar de dataset del query1 y en la consulta del query2, colocas lo siguiente:<BR> <BR>"select * from tabla2 where campo_id_tabla2 = :campo_id_tabla1"<BR> <BR>y eso es todo<BR> <BR>saludo,<br> <BR><div><div id="SkyDrivePlaceholder"></div>> From: lazarus-es-request@lists.lazarus.freepascal.org<br>> Subject: Resumen de Lazarus-es, Vol 62, Envío 9<br>> To: lazarus-es@lists.lazarus.freepascal.org<br>> Date: Tue, 27 Nov 2012 12:00:01 +0100<br>> <br>> Envíe los mensajes para la lista Lazarus-es a<br>> lazarus-es@lists.lazarus.freepascal.org<br>> <br>> Para subscribirse o anular su subscripción a través de la WEB<br>> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es<br>> <br>> O por correo electrónico, enviando un mensaje con el texto "help" en<br>> el asunto (subject) o en el cuerpo a:<br>> lazarus-es-request@lists.lazarus.freepascal.org<br>> <br>> Puede contactar con el responsable de la lista escribiendo a:<br>> lazarus-es-owner@lists.lazarus.freepascal.org<br>> <br>> Si responde a algún contenido de este mensaje, por favor, edite la<br>> linea del asunto (subject) para que el texto sea mas especifico que:<br>> "Re: Contents of Lazarus-es digest...". Además, por favor, incluya en<br>> la respuesta sólo aquellas partes del mensaje a las que está<br>> respondiendo.<br>> <br>> <br>> Asuntos del día:<br>> <br>> 1. querys relacionados (Paola Bruccoleri)<br>> 2. Re: querys relacionados (christian Ortiz)<br>> 3. Re: querys relacionados (Ismael L. Donis Garcia)<br>> 4. Re: querys relacionados (Paola Bruccoleri)<br>> 5. Re: querys relacionados (Paola Bruccoleri)<br>> 6. Re: querys relacionados (Oscar Benitez Carrillo)<br>> <br>> <br>> ----------------------------------------------------------------------<br>> <br>> Message: 1<br>> Date: Mon, 26 Nov 2012 16:04:38 -0200<br>> From: Paola Bruccoleri <pbruccoleri@adinet.com.uy><br>> Subject: [Lazarus-es] querys relacionados<br>> To: Lista Lazarus <lazarus-es@lists.lazarus.freepascal.org><br>> Message-ID: <50B3AF36.9090403@adinet.com.uy><br>> Content-Type: text/plain; charset=ISO-8859-1; format=flowed<br>> <br>> Hola lista..<br>> tengo 2 querys relacionados al estilo tablas maestro/detalle.<br>> Esos querys se muestran en 2 grids respectivamente.<br>> En qué evento del grid maestro debo colocar la consulta relacionada para <br>> que al cambiar de renglón se actualice el detalle? sería en alguno <br>> onChange o algo así...<br>> <br>> qry.Close;<br>> qry.ParamByName('id').AsString:= qry2.FieldByName('id').AsInteger;<br>> qry.Open;<br>> <br>> muchas gracias!<br>> byeeeeeee<br>> <br>> <br>> <br>> <br>> ------------------------------<br>> <br>> Message: 2<br>> Date: Mon, 26 Nov 2012 14:22:20 -0500<br>> From: christian Ortiz <xortix@gmail.com><br>> Subject: Re: [Lazarus-es] querys relacionados<br>> To: Spanish version of Lazarus List<br>> <lazarus-es@lists.lazarus.freepascal.org><br>> Message-ID:<br>> <CA+yxqktdiCFnyPeC4g-7Ne1FmoY90ZmjAbLfCE0rbs=L3QbkQQ@mail.gmail.com><br>> Content-Type: text/plain; charset="iso-8859-1"<br>> <br>> Tiene que controlarlo en el evento OnChange de tu DataSource<br>> <br>> <br>> El 26 de noviembre de 2012 13:04, Paola Bruccoleri <<br>> pbruccoleri@adinet.com.uy> escribió:<br>> <br>> > Hola lista..<br>> > tengo 2 querys relacionados al estilo tablas maestro/detalle.<br>> > Esos querys se muestran en 2 grids respectivamente.<br>> > En qué evento del grid maestro debo colocar la consulta relacionada para<br>> > que al cambiar de renglón se actualice el detalle? sería en alguno onChange<br>> > o algo así...<br>> ><br>> > qry.Close;<br>> > qry.ParamByName('id').**AsString:= qry2.FieldByName('id').**AsInteger;<br>> > qry.Open;<br>> ><br>> > muchas gracias!<br>> > byeeeeeee<br>> ><br>> ><br>> > ______________________________**_________________<br>> > Lazarus-es mailing list<br>> > Lazarus-es@lists.lazarus.**freepascal.org<Lazarus-es@lists.lazarus.freepascal.org><br>> > http://lists.lazarus.**freepascal.org/mailman/**listinfo/lazarus-es<http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es><br>> ><br>> <br>> <br>> <br>> -- <br>> Christian<br>> ------------ próxima parte ------------<br>> Se ha borrado un adjunto en formato HTML...<br>> URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20121126/d9aa11ed/attachment-0001.html><br>> <br>> ------------------------------<br>> <br>> Message: 3<br>> Date: Mon, 26 Nov 2012 15:04:56 -0500<br>> From: "Ismael L. Donis Garcia" <ismael@citricos.co.cu><br>> Subject: Re: [Lazarus-es] querys relacionados<br>> To: "Spanish version of Lazarus List"<br>> <lazarus-es@lists.lazarus.freepascal.org><br>> Message-ID: <684BA030F09F459FA4083A401BED6631@eicc.citricos.cu><br>> Content-Type: text/plain; format=flowed; charset="iso-8859-1";<br>> reply-type=response<br>> <br>> Si debe ser así. O al menos eso pienso.<br>> <br>> Solo con la diferencia de que pienso que no sea un string sino un integer.<br>> <br>> ósea<br>> <br>> qry.Close;<br>> qry.ParamByName('id').AsInteger:= qry2.FieldByName('id').AsInteger;<br>> qry.Open;<br>> <br>> Debe ser en el evento AfterScroll del dataset.<br>> <br>> Saludos<br>> =========<br>> || ISMAEL ||<br>> =========<br>> ----- Original Message ----- <br>> From: "Paola Bruccoleri" <pbruccoleri@adinet.com.uy><br>> To: "Lista Lazarus" <lazarus-es@lists.lazarus.freepascal.org><br>> Sent: Monday, November 26, 2012 1:04 PM<br>> Subject: [Lazarus-es] querys relacionados<br>> <br>> <br>> Hola lista..<br>> tengo 2 querys relacionados al estilo tablas maestro/detalle.<br>> Esos querys se muestran en 2 grids respectivamente.<br>> En qué evento del grid maestro debo colocar la consulta relacionada para<br>> que al cambiar de renglón se actualice el detalle? sería en alguno<br>> onChange o algo así...<br>> <br>> qry.Close;<br>> qry.ParamByName('id').AsString:= qry2.FieldByName('id').AsInteger;<br>> qry.Open;<br>> <br>> muchas gracias!<br>> byeeeeeee<br>> <br>> <br>> _______________________________________________<br>> Lazarus-es mailing list<br>> Lazarus-es@lists.lazarus.freepascal.org<br>> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es<br>> <br>> <br>> <br>> <br>> <br>> ------------------------------<br>> <br>> Message: 4<br>> Date: Mon, 26 Nov 2012 18:27:33 -0200<br>> From: Paola Bruccoleri <pbruccoleri@adinet.com.uy><br>> Subject: Re: [Lazarus-es] querys relacionados<br>> To: Spanish version of Lazarus List<br>> <lazarus-es@lists.lazarus.freepascal.org><br>> Message-ID: <50B3D0B5.2040005@adinet.com.uy><br>> Content-Type: text/plain; charset=ISO-8859-1; format=flowed<br>> <br>> El 26/11/2012 06:04 p.m., Ismael L. Donis Garcia escribió:<br>> > Si debe ser así. O al menos eso pienso.<br>> ><br>> > Solo con la diferencia de que pienso que no sea un string sino un <br>> > integer.<br>> > ósea<br>> ><br>> > qry.Close;<br>> > qry.ParamByName('id').AsInteger:= qry2.FieldByName('id').AsInteger;<br>> > qry.Open;<br>> ><br>> > Debe ser en el evento AfterScroll del dataset.<br>> si, lo de asstring se me comió.. lo escribí en el mail, no fue copiado <br>> del código xq lo modifiqué<br>> <br>> en el datasource no hay ningún evento onchange;<br>> en el tzquery será el que dice Ismael...<br>> <br>> <br>> <br>> <br>> <br>> ------------------------------<br>> <br>> Message: 5<br>> Date: Mon, 26 Nov 2012 18:40:57 -0200<br>> From: Paola Bruccoleri <pbruccoleri@adinet.com.uy><br>> Subject: Re: [Lazarus-es] querys relacionados<br>> To: Spanish version of Lazarus List<br>> <lazarus-es@lists.lazarus.freepascal.org><br>> Message-ID: <50B3D3D9.1080503@adinet.com.uy><br>> Content-Type: text/plain; charset=ISO-8859-1; format=flowed<br>> <br>> El 26/11/2012 06:27 p.m., Paola Bruccoleri escribió:<br>> > El 26/11/2012 06:04 p.m., Ismael L. Donis Garcia escribió:<br>> >> Si debe ser así. O al menos eso pienso.<br>> >><br>> >> Solo con la diferencia de que pienso que no sea un string sino un <br>> >> integer.<br>> >> ósea<br>> >><br>> >> qry.Close;<br>> >> qry.ParamByName('id').AsInteger:= qry2.FieldByName('id').AsInteger;<br>> >> qry.Open;<br>> >><br>> >> Debe ser en el evento AfterScroll del dataset.<br>> > si, lo de asstring se me comió.. lo escribí en el mail, no fue copiado <br>> > del código xq lo modifiqué<br>> ><br>> > en el datasource no hay ningún evento onchange;<br>> > en el tzquery será el que dice Ismael...<br>> bueno, es más fácil de lo que pensé.. es como si fueran tablas, no hay <br>> que indicar parámetros en la sentencia sql en el where..<br>> en el query de detalle se establecen las propiedades mastersource, <br>> masterfields y linkedfields y listo...<br>> <br>> byeeeeeeeee<br>> <br>> <br>> <br>> <br>> ------------------------------<br>> <br>> Message: 6<br>> Date: Mon, 26 Nov 2012 17:01:00 -0600<br>> From: Oscar Benitez Carrillo <obc5005@yahoo.com.mx><br>> Subject: Re: [Lazarus-es] querys relacionados<br>> To: Spanish version of Lazarus List<br>> <lazarus-es@lists.lazarus.freepascal.org><br>> Message-ID: <50B3F4AC.1040903@yahoo.com.mx><br>> Content-Type: text/plain; charset=ISO-8859-1; format=flowed<br>> <br>> El TDataSource tiene un evento OnDataChange, que se dispara que cada vez <br>> que cambias de datos el DataSource, la cual va ocurriendo cuando haces <br>> un scroll en el DataGrid, es decir en cada cambio de fila, cambian los <br>> datos del DataSource. Prueba en este evento, abriendo y cerrando el <br>> detalle con los nuevos parámetros o sql.<br>> <br>> El 26/11/2012 02:40 p.m., Paola Bruccoleri escribió:<br>> > El 26/11/2012 06:27 p.m., Paola Bruccoleri escribió:<br>> >> El 26/11/2012 06:04 p.m., Ismael L. Donis Garcia escribió:<br>> >>> Si debe ser así. O al menos eso pienso.<br>> >>><br>> >>> Solo con la diferencia de que pienso que no sea un string sino un <br>> >>> integer.<br>> >>> ósea<br>> >>><br>> >>> qry.Close;<br>> >>> qry.ParamByName('id').AsInteger:= qry2.FieldByName('id').AsInteger;<br>> >>> qry.Open;<br>> >>><br>> >>> Debe ser en el evento AfterScroll del dataset.<br>> >> si, lo de asstring se me comió.. lo escribí en el mail, no fue <br>> >> copiado del código xq lo modifiqué<br>> >><br>> >> en el datasource no hay ningún evento onchange;<br>> >> en el tzquery será el que dice Ismael...<br>> > bueno, es más fácil de lo que pensé.. es como si fueran tablas, no hay <br>> > que indicar parámetros en la sentencia sql en el where..<br>> > en el query de detalle se establecen las propiedades mastersource, <br>> > masterfields y linkedfields y listo...<br>> ><br>> > byeeeeeeeee<br>> ><br>> ><br>> > _______________________________________________<br>> > Lazarus-es mailing list<br>> > Lazarus-es@lists.lazarus.freepascal.org<br>> > http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es<br>> ><br>> <br>> <br>> <br>> <br>> ------------------------------<br>> <br>> _______________________________________________<br>> Lazarus-es mailing list<br>> Lazarus-es@lists.lazarus.freepascal.org<br>> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es<br>> <br>> <br>> Fin de Resumen de Lazarus-es, Vol 62, Envío 9<br>> *********************************************<br></div> </div></body>
</html>