shoulder
04-11-2012, 17:37:47
Hola tengo un problema no puedo encontrar la solucion. Tengo que leer dos tablas de dos bases de datos, MYSQL con zquery hice dos dataset hasta aqui ningun problema. El tema como hago en qreport para leer por ejemplo un zquery1 con el primer select hago el while dentro de este el otro zquery2 cargo las variables del detailband (use label o las qrdbtext) pero siempre me muestra la primera linea. Siempe use delphi con excel y ahi no tengo problemas pero con qreport .....
Ejemplo
zQuery1.Clear;
zQuery1.Close;
zQuery1.SQL.add(‘SELECT nombre FROM provincias order by nombre');
….
Zquery1.open
While not zquery1.eof do
begin
zQuery2.SQL.add(‘SELECT nombre FROM ciudad order by nombre
where…');
………
//asociado al dataset1 en qreport
QRDBText1.DataField := zquery1.fields.[0].AsString;
//asociado al dataset2 en qreport
QRDBText2.DataField := zquery1.fields.[0].AsString;
zquery1.next
end;
Ejemplo
zQuery1.Clear;
zQuery1.Close;
zQuery1.SQL.add(‘SELECT nombre FROM provincias order by nombre');
….
Zquery1.open
While not zquery1.eof do
begin
zQuery2.SQL.add(‘SELECT nombre FROM ciudad order by nombre
where…');
………
//asociado al dataset1 en qreport
QRDBText1.DataField := zquery1.fields.[0].AsString;
//asociado al dataset2 en qreport
QRDBText2.DataField := zquery1.fields.[0].AsString;
zquery1.next
end;