Fórum ajuda delphi pesquisa #425246
02/10/2012
0
tipo assim tenho um formulario de agenda de serviços e queria pesquisar qual o fucionario que realizou o serviço,sendo que
gostaria que aparecece no grid só os serviços que o fucionario realizou,
o meu banco de dados é o interbase
Glebson Guimaraes
Curtir tópico
+ 0Posts
02/10/2012
Deivison Melo
http://www.facunte.com.br/livros/dw7/livro_delphi_web_capitulo_7.pdf
Qualquer dúvida postar!
Gostei + 0
02/10/2012
Joel Rodrigues
Poste a estrutura de suas tabelas.
Gostei + 0
02/10/2012
Glebson Guimaraes
como fazer a consulta.
Gostei + 0
02/10/2012
Joel Rodrigues
SELECT * FROM SERVICOS WHERE FUNCIONARIO = :valor
Gostei + 0
03/10/2012
Glebson Guimaraes
HO EU FIZ ASSIM
procedure Tformagenda.Button2Click(Sender: TObject);
begin
DmDados.IBQueryAgenda.Close;
DmDados.IBQueryAgenda.ParamByName('Fuci_atend').AsString:='%'+Edit1.Text+'%';
DmDados.IBQueryAgenda.open;
end;
POREM NUM APARECE NADA QUANDO DIGITO NO EDIT E CLICO NO BUTTON2
Gostei + 0
03/10/2012
Joel Rodrigues
A ideia é a seguinte, adequando a consulta à sua tabela:
procedure Tformagenda.Button2Click(Sender: TObject);
begin
DmDados.IBQueryAgenda.Close;
DmDados.IBQueryAgenda.SQL.Text := 'SELECT * FROM ATENDIMENTOS WHERE FUNCIONARIO= :fun';
DmDados.IBQueryAgenda.ParamByName('fun').AsString := Edit1.Text;
DmDados.IBQueryAgenda.open;
end;
Como você está usando um comparador de igualdade, não precisa dos "coringas" (%).
Gostei + 0
03/10/2012
Glebson Guimaraes
where FUCIONA_ATENDENTE= :Fuci_atend;
Gostei + 0
03/10/2012
Glebson Guimaraes
procedure Tformagenda.Button2Click(Sender: TObject);
begin
DmDados.IBQueryAgenda.Close;
DmDados.IBQueryAgenda.SQL.Text:= 'SELECT * AGENDA WHERE FUCIONA_ATENDENTE= : Fuci_anted';
DmDados.IBQueryAgenda.ParamByName('Fuci_anted').AsString:=Edit1.Text;
DmDados.IBQueryAgenda.open;
end;
daí da um erro 'IBQueryAgenda: Parameter 'fuci_atend' not found'
Gostei + 0
03/10/2012
Joel Rodrigues
Gostei + 0
03/10/2012
Glebson Guimaraes
daquele outro jeito passa fica na linha debaixo
Gostei + 0
03/10/2012
Joel Rodrigues
Gostei + 0
03/10/2012
Glebson Guimaraes
só que quando clico num acontece nada ta igual o outro
Gostei + 0
03/10/2012
Glebson Guimaraes
eu tambem tinha colocado a função habilitar ou desabilitar datasource.
e dai nem precisa dizer o resto
kkk
rsrsrrs
Gostei + 0
03/10/2012
Joel Rodrigues
Grande abraço.
Estou encerrando o tópico.
Gostei + 0
04/10/2012
Alisson Santos
procedure Tformagenda.Button2Click(Sender: TObject);
begin
with DmDados.IBQueryAgenda do
begin
Close;
Sql.Clear;
Sql.Add('select * from agenda');
Sql.Add('where FUCIONA_ATENDENTE = ' + Quoted(Edit1.Text));
Open;
end;
Essa maneira não precisaria criar um parametro para ter o retorno.
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)