Ninguem Sabe!! uma semana gt;gt;gt;(Relatorio)
06/02/2003
0
Tem como fazer um RELATRIO(Quick Report) com nome? se digita a letra ´ M ´ no Edit1 e sai a relacão dos cliente que começa só com a letra´ M ´ no Form2 ????
E se tem que usa uma Query, que codigo que usa na Propriedade SQL e em qual Form
Eu tenho um relatorio só que sair todos relacão dos clientes da ´´ Table ´´, eu uso Dois ´´ Form ´´ e este comando
>>>NO OnClick do Botão do Form1 { Comando que chama o Form2Rela }
Form2Rela:=TFrm2Rela.create(application);
Form2Rela.QuickRep1.PreView;
Form2Rela.QuickRep1.Free;
Form2Rela.free;
Anonymous
Posts
06/02/2003
Anonymous
no on exit do edit, tenta colocar este codigo:
procedure Edit1.onexit(sender)
begin
Table1.filtered := ´nome_campo = ´´´ + edit1.text + ´´´;
Table1.filter := true;
end;
06/02/2003
Rodrigo_lemes
No botão que chama o relatório coloque o código:
With QuickReport1 do
Begin
Query1.Close;
Query1.SQL[1]:= ´WHERE NomeCampo Like ´+´´´´+Edit1.Text+´¬´´´;
Query1.Open;
Preview;
End;
Obs.:
Se desejar em qualquer parte do nome coloque:
´WHERE NomeCampo Like ´+´´´¬´+Edit1.Text+´¬´´´;
Qualquer dúvida me envie um e-mail.
Um grande abraço,
Rodrigo Lemes
07/02/2003
Anonymous
A melhor maneira e utilizar uma query:
select * from clientes where nome like edit1.text+´¬´
´Essa linha diz para mostrar todos os registros da tabela clientes onde o nome começe com conteúdo do edit1.text. O problema é com os acentos.
Você também pode utilizar o filter e filtered da tabela.
table1.Filter := ´nome like ´+quotedstr(´edit1.text+´¬´)
table1.filtered := true;
Clique aqui para fazer login e interagir na Comunidade :)