Relatório de Clientes

Crie um formulário novo e altere as propriedades:
Name: frmRCliente
Caption: Relatório de Cliente

Vá até o Menu File / Use Unit e selecione Modulo para vincular as tabelas que estão no módulo no formulário atual.


Vá ate a guia Additional e coloque dois botões:
Name: btnVisualizar
Caption: &Visualizar

Name: btnImprimir
Caption: Im&primir

Vá até a guia QReport.
Selecione o componente QuickRep (primeiro da lista) e arraste-o abaixo dos botões até o restante do formulário. Altere as propriedades:
DataSet: dmDespesa.tbCliente
Name: qrRelatorio

Para inserir as seções do relatório, clique com o botão direito sobre o qrRelatorio, e deixe as opções, de acordo com a figura abaixo:

qr_Propriedade

Selecione a banda (seção) TitleBand1.
Altere a propriedade:
Name: qrTitulo

Coloque um componente qrLabel dentro desta banda.
Altere a propriedades:
Caption: Relatório de Clientes
Name: qrlblTitulo
Font: Formate com o tamanho 14, Negrito.

Selecione a banda (seção) TitleBand2.
Name: qrCabecalho
Caption: Relatório de Clientes

Coloque 2 componentes qrLabel dentro desta banda.
Altere a propriedades:
Caption: Código
Name: qrlblCodigo
Caption: Nome
Name: qrlblNome

Selecione a banda (seção) TitleBand3.
Altere a propriedade:
Name: qrDetalhe

Vá até a guia QReport.
Selecione o componente QRDBText e coloque dentro do qrDetalhe. Altere as propriedades:
Name: qrdbCodigo
DataSet: dmDespesa.tbCliente
DataField: Codigo

Vá até a guia QReport.
Selecione o componente QRDBText e coloque dentro do qrDetalhe. Altere as propriedades:
Name: qrdbNome
DataSet: dmDespesa.tbCliente
DataField: Nome

Vá até a guia QReport.
Selecione o componente QRSysData e coloque dentro do qrTitulo. Altere as propriedades:
Name: qrData
Data: qrsDate //Data do sistema

Vá até a guia QReport.
Selecione o componente QRSysData e coloque dentro do qrTitulo. Altere as propriedades:
Name: qrHora
Data: qrsTime //Hora do sistema

Dê um duplo clique no botão btnVisualizar e digite o código abaixo:
qrRelatorio.Preview;

Dê um duplo clique no botão btnImprimir e digite o código abaixo:
qrRelatorio.Print;

No evento onShow do formulário: dmDespesa.tbCliente.Open;
No evento onClose do formulário: dmDespesa.tbCliente.Close;

Diminua o formulário deixando de acordo com a imagem abaixo:

Retirando as barras de rolagem

Selecione o formulário.
Altere a propriedade HorzScrollBar. Clique no sinal de + e na propriedade Visible deixe-a como False.
Altere a propriedade VertScrollBar. Clique no sinal de + e na propriedade Visible deixe-a como False.

O formulário deverá ficar de acordo com a imagem abaixo:

1