Fazendo pesquisa no banco de dados

Criação de relatórios Utilizando Delhpi 5.0 e FastReport
* Obviamente o FastReport deverá estar instalado e configurado no Delphi.

Primeira etapa: construir a interface de consulta

1. Em um DataModule ou em um Form coloque um frReport e frBDEComponents da aba FastReport
2. No Object Inspector na aba Properties, selecione a opçao TRUE em StoreInDFM
3. Dê um clique com botão direito e selecione Design Report
4. Clique no botão Add Dialog Form
6. Onde tem Page2 Arraste para Page1,sem mostrar nada, agora a janela de diálogo é a primeira a aparecer
7. Selecione do lado esquerdo Insert Query
8. Dê um clique no formulario (aparecerá uma query)
9. Selecione InsertLabelControl e clique na janela
10. No object inspector na opção caption coloque o titulo que desejar, se desejar ver
como está clique no botão Preview report do fastreport
11. Coloque um botão na opção Insert button control
12. Colque um DBLookUPComboBox clicando em Insert DBLookUpComboBoxControl

--- Pronto: Interface criada ---

segunda etapa: ligar a interface com o bd

1. Coloque um componente table
2. Clique em table e no object inspector e em databasename e selecione seu ALIAs
Obs.: Para mostrar dados vc terá que Já ter um criado um ALIAS para seu bd utilizando o
BDE Administrator ou o SQLMonitor
3. No object inspector clique em Active e selecione true para a sua table;
4. No object Inspector clique em tablename e selecione o nome da tabela que quer mostrar
os dados
5. Agora clique sobre o DBLookupComboBox e selecione no object inspector listSource: a tabela
que vc colocou, listField: o nome do campo que quer mostrar para o usuario, e por ultimo
keyfield (campo chave primária da tabela)
( a partir deste momento do componente dblookupcombobox passa a mostrar o campo
que foi selecionado, para ver clique em Preview)

6. Clique na Query
7. no object inspector clique na opção databasename e selecione o nome do alias do seu bd
3. Permaneça com a query selecionada e selecione no object inspector a opção SQL, será
aberta uma janela (clique no botão ao lado)
8. Agora vc pode digitar ai qualquer expressão em SQL para a consulta no seu bd. Porém essa
consulta deve ter uma "variavel" que vai receber o conteudo da seleção do dblookupcombobox.
Exemplo de uma consulta:
select *from aluno where (cod_aluno:=CodA)
Essa consulta mostra o nome do aluno que tem cod_aluno igual ao conteudo da variavel CodA)
9. Clique na Query e em Object Inspector clique em Params (somente vai abrir a janela
se vc criar a "variavel" na sua consulta SQL, no caso CodA)
10. Na janela que se abrir no campo Data Type selecione o tipo do campo que está na
consulta, no caso cod_aluno é Integer.
11. Agora clique na opção value e coloque o seguinte código: dblookupcombobox1.text, desse
na sua consulta será levado em consideração o texto do componente.

--- Pronto,bd linkado.---

Terceira etapa: Construir o relatório mostrado ao usuario

1.Clique na aba Page2
2.Clique em InsertBand e depois em MasterHeader(cabeçalho mostrado em todas páginas)
3.Clique em Object Retangle e digite um titulo
4.clique no botão e no object inspector e na opção ModalResult selecione mrOK.
(Faça um teste clique preview e clique no botão, deverá ser mostrado um relatório em branco)
5.Clique em InsertBand e depois em MasterData clique em sua query e ok
6. Observe a janela Insert Data Field, clique na sua query, se não houver erros de sintaxe
na sua expressão SQL todos os campos da tabela serão mostrados, arraste aquele que vc
apareça no seu relatorio. O que deve acontecer é que para o código do aluno selecionado
no dblookupcombobox o nome correspondente será mostrado.
7.Observe que existem ferramentas para fazer linhas ou colocar linhas no retangle.
( a partir deste momento o relatório já pode ser mostrado,para ver clique em Preview)


--- Relatório criado ---

Quarta Etapa: Código no delphi para mostrar o relatório

1. Salve tudo
2. No delhpi, se quiser chamar o relatório a partir de um botão:
no evento OnClick do botão digite: nome do report.showReport, no caso aqui

frReport1.showReport;

3. Se quiser utilizar um menu é só adicionar o mesmo código no menu.

Tudo terminado.

--- Relatório mostrado ---


Ok! É só isso.