como fazer consulta com IBQuery
o usuário deve digitar o conteúdo da pesquisa num EDIT e clicar num BOTÃO PESQUISAR e o conteúdo da pesquisa deve ser mostrado num DBGRID...
eu uso Interbase e componentes da paleta IB
uso IBQuery e Dsource para pesquisa...
obrigado
eu uso Interbase e componentes da paleta IB
uso IBQuery e Dsource para pesquisa...
obrigado
Rafael Santana
Curtidas 0
Respostas
Isabelct
13/01/2005
Faça mais ou menos assim:
IBQuery.SQL.Clear;
IBQuery.SQL.Add(´SELECT CAMPO1, CAMPO2 FROM TABELA´);
IBQuery.SQL.Add(´WHERE CAMPO1 = :P_CAMPO1´);
IBQuery.ParamByName(´P_CAMPO1´).AsString := EditPesquisa.Text;
IBQuery.Open;
Aponte o DataSource normalmente para a IBQuery, e configure o DBGrid para pegar dados deste DataSource.
--
Isabel
IBQuery.SQL.Clear;
IBQuery.SQL.Add(´SELECT CAMPO1, CAMPO2 FROM TABELA´);
IBQuery.SQL.Add(´WHERE CAMPO1 = :P_CAMPO1´);
IBQuery.ParamByName(´P_CAMPO1´).AsString := EditPesquisa.Text;
IBQuery.Open;
Aponte o DataSource normalmente para a IBQuery, e configure o DBGrid para pegar dados deste DataSource.
--
Isabel
GOSTEI 0
Rafael Santana
13/01/2005
ISaBEl...
MUITO OBRIGADO...
deu certinho, MAS agora eu preciso fazer um LIKE com esse parâmentro
como faço
(´WHERE CAMPO1 LIKE......) ???????????????
MUITO OBRIGADO...
deu certinho, MAS agora eu preciso fazer um LIKE com esse parâmentro
como faço
(´WHERE CAMPO1 LIKE......) ???????????????
GOSTEI 0
Isabelct
13/01/2005
Pra usar o Like, é melhor fazer um pouquinho diferente. Veja:
IBQuery.SQL.Clear;
IBQuery.SQL.Add(´SELECT CAMPO1, CAMPO2 FROM TABELA´);
IBQuery.SQL.Add(´WHERE CAMPO1 LIKE ´ + QuotedStr(EditPesquisa.Text + ´¬´));
IBQuery.Open;
Esta consulta vai te retornar todos os registros onde o CAMPO1 começa com o que você digitar em EditPesquisa.Text
--
Isabel
IBQuery.SQL.Clear;
IBQuery.SQL.Add(´SELECT CAMPO1, CAMPO2 FROM TABELA´);
IBQuery.SQL.Add(´WHERE CAMPO1 LIKE ´ + QuotedStr(EditPesquisa.Text + ´¬´));
IBQuery.Open;
Esta consulta vai te retornar todos os registros onde o CAMPO1 começa com o que você digitar em EditPesquisa.Text
--
Isabel
GOSTEI 0