PESQUISA APROXIMADA USANDO DELPHI COM ACCESS
ALGUÉM PODE ME INFORMAR COMO FAÇO PRA FAZER UMA PESQUISA APROXIMADA USANDO O BANCO DE DADOS ACCESS. EU USO UM EDIT E UM DBGRID, ATÉ AÍ TUDO BEM, MAIS EU NÃO SEI COMO FAÇO PRA LOCALIZAR UM NOME APROXIMADAMENTE EM MEU DBGRID. OBRIGADA
Anonymous
Curtidas 0
Respostas
Anonymous
09/02/2003
Lendo a última revista clubedelphi vi um artigo do FernandoVM que mostra a diferença entre o BDE e o ADO na pesquisa aproximada de nomes. É que no BDE você usa ´´Nome= ´A¬´´ por exemplo para nomes começados em A. E no ADO seria assim ´´Nome like ´A¬´´. Veja se é isso. Abraços.
GOSTEI 0
Sidfaria
09/02/2003
Tanto acessando Paradox, ou Interbase ou Access usando o SQL padrão o comando é o mesmo ou seja, crie uma Query com o seguinte comando onde voce informa por parametro a inicial dos Nomes que você quer recuperar, que pode ser informada via um Edit. O comando SQL é:
if NomeTabela.Active then
NomeTabela.Close;
NomeTabela.SQL.Text := ´Select Nome from Tabela ´ +
´ where Nome like :Nome´;
// Nota: Você pode criar a Query (TQuery) já com o comando acima.
Após o usuário ter informado o nome ou as iniciais no EDit faça
NomeDaQuery.ParamByName(´Nome´).AsString := Edit1.Text + ´¬´;
NomeDaQuery.Open;
Voce terá no DBGrid (você deve apontá-lo para a Query) todos os nomes que contenham as iniciais informadas
if NomeTabela.Active then
NomeTabela.Close;
NomeTabela.SQL.Text := ´Select Nome from Tabela ´ +
´ where Nome like :Nome´;
// Nota: Você pode criar a Query (TQuery) já com o comando acima.
Após o usuário ter informado o nome ou as iniciais no EDit faça
NomeDaQuery.ParamByName(´Nome´).AsString := Edit1.Text + ´¬´;
NomeDaQuery.Open;
Voce terá no DBGrid (você deve apontá-lo para a Query) todos os nomes que contenham as iniciais informadas
GOSTEI 0