QuickRep com 2 Querys
Como faco para utilizar o quick report com 2 querys? Pois ele exibe os dados de apenas uma...
ah, ja tentei utilizar o sub detail, mas nao ficou legal, pois necessito que ao terminar todos os dados da primeira query, seja colocado logo abaixo, todos os dados da segunda.... Tem como?
Desde já, muito obrigada
Danieli
ah, ja tentei utilizar o sub detail, mas nao ficou legal, pois necessito que ao terminar todos os dados da primeira query, seja colocado logo abaixo, todos os dados da segunda.... Tem como?
Desde já, muito obrigada
Danieli
Anonymous
Curtidas 0
Respostas
Aroldo Zanela
27/02/2003
Colega,
Veja o Demo do QuickReport (Relatório composto).
Veja o Demo do QuickReport (Relatório composto).
GOSTEI 0
Anonymous
27/02/2003
se nao for muita coisa que vc quiser colocar
coloca uma band summary e um QRMemo e seta ele para AutoStrect true
ai tu joga o resultado o que vc quer em um memo normal ou em arquivo txt carrega no QRMemo.
é uma cambiara mas funciona bem pra mim !
eguinaldo@terra.com.br
coloca uma band summary e um QRMemo e seta ele para AutoStrect true
ai tu joga o resultado o que vc quer em um memo normal ou em arquivo txt carrega no QRMemo.
é uma cambiara mas funciona bem pra mim !
eguinaldo@terra.com.br
GOSTEI 0
Anonymous
27/02/2003
é simples
vc vai ter que usar componentes qrlabel em vez de qrdbtext
ai no subdeail o evento beforeprint
vc faz a consulta exemplo:
begin
with qry_sub do
begin
close;
sql.Clear;
sql.Add(´SELECT *);
sql.Add(´FROM TBL_SU´);
sql.Add(´WHERE N_COD_SUb = :N_COD_SUB_SECRET´);
Parambyname(´N_COD_SUB_SECRET´).AsInteger := qry_ESCOLA.Fieldbyname(´N_COD_SUB´).AsInteger;
open;
qrlbl_SUB.Caption := fieldbyname(´STR_DESC_SUB´).AsString;
end;
desta maneira vc podera usar diversas querys
se não entendeu eu te mando um exemplo
vc vai ter que usar componentes qrlabel em vez de qrdbtext
ai no subdeail o evento beforeprint
vc faz a consulta exemplo:
begin
with qry_sub do
begin
close;
sql.Clear;
sql.Add(´SELECT *);
sql.Add(´FROM TBL_SU´);
sql.Add(´WHERE N_COD_SUb = :N_COD_SUB_SECRET´);
Parambyname(´N_COD_SUB_SECRET´).AsInteger := qry_ESCOLA.Fieldbyname(´N_COD_SUB´).AsInteger;
open;
qrlbl_SUB.Caption := fieldbyname(´STR_DESC_SUB´).AsString;
end;
desta maneira vc podera usar diversas querys
se não entendeu eu te mando um exemplo
GOSTEI 0