ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

[Resolvido] Dúvida com rave reports 5

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
mm_edilson
Novato
Novato


Registrado: Sexta-Feira, 29 de Outubro de 2010
Mensagens: 88

MensagemEnviada: Qui Jun 09, 2011 3:18 pm    Assunto: [Resolvido] Dúvida com rave reports 5 Responder com Citação

Amigos, tenho um formulário onde pesquiso os clientes por nome, endereço, bairro, cidade ou cep. Tenho um combobox onde seleciono o campo, um edit onde digito o termo a pesquisar, e um botão para efetuar a pesquisa. Uso AdoQuery e banco de dados access. O resultado da pesquisa aparece num dbgrid.

O onclick do meu botão tá assim:

Código:

procedure TPesquisa.Button1Click(Sender: TObject);
begin
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('Select *');
ADOQuery1.SQL.Add('From Dados');

  If Combobox1.Text = 'Nome' then
  ADOQuery1.SQL.Add('Where Nome like ''%'+Edit1.Text+'%''');
  If Combobox1.Text = 'Endereço' then
  ADOQuery1.SQL.Add('Where Endereco like ''%'+Edit1.Text+'%''');
  If Combobox1.Text = 'Bairro' then
  ADOQuery1.SQL.Add('Where Bairro like ''%'+Edit1.Text+'%''');
  If Combobox1.Text = 'Cidade' then
  ADOQuery1.SQL.Add('Where Cidade like ''%'+Edit1.Text+'%''');
  If Combobox1.Text = 'CEP' then
  ADOQuery1.SQL.Add('Where CEP like ''%'+Edit1.Text+'%''');

ADOQuery1.SQL.Add('ORDER BY Nome');
ADOQuery1.Open ;
showmessage('Foram localizados ' + inttostr(Adoquery1.recordcount) + ' registros para sua consulta.');

end;


Então criei um relatório no Rave Reports para imprimir o resultado da pesquisa, mas aí vem o problema. O relatórioe aparece em branco. Não preenche os campos.

Fiz o relatório assim assim:

Inseri um RvProject e chamei de RvPesquisa
Inseri um RvDatasetConnection e chamei de RvPesquisaConnection
Na propriedade Dataset do RvPesquisaConnection, apontei para AdoQuery1.
No rave reports criei o relatório "Pesquisa".
Inseri um DataObject -> directDataview -> apontei para RvPesquisaConnection
Então foi criado o Dataview1

Inseri um Databand component e nele os datatexts components.
Linquei corretamente as propriedades dataview e datafield dos datatexts.

Salvei tudo e voltei ao delphi.

Só que quando rodo programa e faço a pesquisa, na hora que clico no botão para gerar o relatório, ele gera o relatório em branco, sem os dados do dbgrid.

Não sei o que fazer.

Se alguém puder ajudar...

Abraços.


Editado pela última vez por mm_edilson em Ter Jun 14, 2011 4:32 pm, num total de 1 vez
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
rafa.spimenta
Profissional
Profissional


Registrado: Sexta-Feira, 31 de Julho de 2009
Mensagens: 621
Localização: Betim

MensagemEnviada: Qui Jun 09, 2011 11:08 pm    Assunto: Responder com Citação

Vc Linquou a propriedade DataView do seu DataBand?
_________________
"Você pode ter todo o dinheiro do mundo, mas há algo que jamais poderá comprar: um dinossauro!"

Meu blog:
http://delphiexpresso.blogspot.com/
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Visitar a homepage do Usuário
mm_edilson
Novato
Novato


Registrado: Sexta-Feira, 29 de Outubro de 2010
Mensagens: 88

MensagemEnviada: Sex Jun 10, 2011 8:55 am    Assunto: Responder com Citação

Citação:
Vc Linquou a propriedade DataView do seu DataBand?


É, na verdade eu tinha esquecido esse detalhe, mas mesmo assim não resolveu. Agora, após lincado, quando gero o relatório, em todos os campos aparece apenas "invalid".
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
mm_edilson
Novato
Novato


Registrado: Sexta-Feira, 29 de Outubro de 2010
Mensagens: 88

MensagemEnviada: Ter Jun 14, 2011 4:17 pm    Assunto: Responder com Citação

Amigos, consegui resolver. O mais difícil é sempre o mais fácil.

Só faltava dar um "refresh" no Dataview.

Aff... Mas valeu.

Agora tudo funciona.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
lucianomoraes69
Membro Junior
Membro Junior


Registrado: Sexta-Feira, 11 de Fevereiro de 2011
Mensagens: 360
Localização: Porto Alegre / RS

MensagemEnviada: Ter Jul 30, 2013 5:24 pm    Assunto: Responder com Citação

Olá mm_edilson,
sei que o post é antigo e já foi resolvido,
mas como tive problema semelhante, pergunto a ti ou a quem quiser:

Em relação a Refresh no dataView, como se faz isto?
_________________
Pascal desde 1998.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular MSN Messenger
lucianomoraes69
Membro Junior
Membro Junior


Registrado: Sexta-Feira, 11 de Fevereiro de 2011
Mensagens: 360
Localização: Porto Alegre / RS

MensagemEnviada: Qua Jul 31, 2013 12:36 pm    Assunto: Responder com Citação

Procurei bastante na web e não consegui encontrar algo simples, e rápido. O que tive que fazer temporáriamente foi um componente para seleção pra cada tipo de seleção. E a partir daí atribuir o componente ao relatório em tempo de execução.

Também não encontrei nada na documentação do RaveReports em relação a isto, bem como no site existem vários links que não funcionam.

12:39 pm
_________________
Pascal desde 1998.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular MSN Messenger
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB