Quick Report com duas querys, duas colunas

[Jeck]

Galera, minha bronca é a seguinte:

Preciso imprimir um relatório com duas querys, Utilizando duas colunas e após a impressão da primeira a segunda venha logo em seguida com o layaout abaixo. Consigo gerar normalmente com uma tabela usando o QRGroup. Mas como seria para imprimir a segunda tabela na sequencia?

Grato desde já.

DADOS DA PRIMEIRA QUERY

SEGUNDA FEIRA QUINTA FEIRA

EVENTO LOCAL ESCALADO EVENTO LOCAL ESCALADO

evento1 Rua A escalado1 evento1 Rua A escalado1

evento2 Rua B escalado2 evento2 Rua B escalado2

TERÇA FEIRA DADOS DA SEGUNDA QUERY

EVENTO LOCAL ESCALADO SEGUNDA FEIRA

evento1 Rua A escalado1 EVENTO LOCAL ESCALADO

evento2 Rua B escalado2 evento1 Rua A escalado1

evento2 Rua B escalado2

QUARTA FEIRA

EVENTO LOCAL ESCALADO TERÇA FEIRA

evento1 Rua A escalado1 EVENTO LOCAL ESCALADO

evento2 Rua B escalado2 evento1 Rua A escalado1

evento2 Rua B escalado2

[Jhonas]

porque usar 2 querys se os dados da primeira e da segunda querys parecem ser iguais ?

se os dados são de tabelas diferentes, faça relacionamento entre as tabelas e use apenas uma query

para dividir o quick report em colunas, veja o item 6 desse artigo

Criando Relatório no Delphi

1.Abra um novo Form

2.Insira o componente QuickRep (aba QReport).

3.Ligar a propriedade DataSet do componente QuickRep com a tabela que você deseja fazer o relatório. Se não tiver nada nessa propriedade, significa que a tabela não está nesse formulário, então é necessário fazer a ligação com o formulário que tem a tabela, para isto clique no menu File – use unit, escolha a unidade que tem a tabela e clique em ok.

4.Insira um QRBand - responsável para fazer o cabeçalho. Para isso mude BandType desse QRBand para RBPageHeader. Obs. Sempre que você colocar um QRBand, o tipo dela será Title (título), para mudar esse tipo utilize a propriedade BandType. No cabeçalho, vou querer que saia a data, portanto, coloque o componente QRSysDate e muda a propriedade Data para QrsDate.

5.Insira outro QRBand – responsável por colocar um título no relatório. Coloque dentro dessa banda o componente QRLabel e digite o título do seu relatório na propriedade caption. Para centralizar um título mude as seguintes propriedades do QRLabel : Alignment – tacenter e AligntoBand - True

6.Insira outro QRBand – agora responsável por fazer o relatório em colunas. Para isso, mude a propriedade BandType para RBColumnHeader. Coloque dentro dessa banda a quantidade de QRLabel necessária para montar o seu relatório. Por exemplo, se você quer que no relatório saia Nome, Endereço e Telefone, então coloque 3 QrLabel’s e mude a propriedade caption.

7.Insira outro QRBand – responsável por pegar os dados no Banco de Dados. Mude a propriedade BandType para RBDetail. Coloque dentro dessa banda a quantidade de QRDBText (dependendo das informações que você quer que saia no relatório – mesmo caso do item acima) e ligue as propriedades DataSet com a tabela e DataField com o nome do campo.

8.Insira outro QRBand – responsável por fazer o rodapé. Mude a propriedade BandType para RBPageFooter. No rodapé eu quero mostrar o nome da pessoa que desenvolveu o relatório, para isto, coloque o QRLabel e mude a propriedade caption, e também o número da página, para isto insira o componente QRSysData, muda a propriedade Data para QRSPageNumber.

9.Salve o seu programa e abra o formulário de menu. Na opção que chama o relatório, fazer a seguinte procedure :

Form3.quickrep1.preview;

Obs: Form3 é o formulário do relatório, no seu projeto pode ser outro.

http://www.planetadelphi.com.br/dica/6261/criando-relat%C3%B3rio-no-delphi---quickreport

abraço

[Jeck]

Jhonas,

Desde já obrigado pela atenção!

Meu relatório já está dividido em colunas tudo certinho, mas com apenas a primeira tabela.

Minha bronca é pra botar a segunda tabela pra imprimir logo após a primeira no mesmo padrão.

Relacionar as tabelas axo que não rola porque são totalmente independente. Por exemplo: Escala de vigilantes e escala de porteiros.

E não sei se você observou: O QuickRep tem duas colunas, ou seja a página é dividida ao meio. A ordem do relatório é de cima para baixo e da esquerda para a direita.

[Jhonas]

Nesse caso voce não pode fazer referencia da tabela ( DataSet ) no quick report

 

uma opção é voce deve usar o evento OnNeedData do quickreport, onde voce pode controlar os registros das duas tabelas independentemente

 

pesquise no forum ou na net sobre OnNeedData

 

ou veja esses exemplos que podem lhe ajudar

http://www.quickreport.co.uk/webinfopage.aspx?WebInfoID=623

abraço