Ajuda - (RESOLVIDO)

[lazarodm]

Gostaria de saber como se faz uma consulta em delphi que quando se digita uma letra em um EDIT o DBGRID mostre apenas o que começa com essa letra e não redirecione o para onde se encontra essa letra mostrando todos os outros.

[ricardo_sdl]

Simples faça assim:

query1.sql.add('Select * from tabela.db where Nome like " '+letra+");

acho que deve funcionar.

[lazarodm]

Obrigado Ricardo_sdl, só mais uma coisa. Isso funciona com qualquer tipo de banco de dados? e

  Citar

where Nome like

esse "NOME" é o nome do campo e

  Citar

" '+letra+");

o edit, certo?

[Corposemalma]

o ideial (mais simples de funcionar) é usar Params ou ParamByName:

query1.sql.add('Select * from tabela.db where Nome like :item);

query1.sql.Params('0').asstring := edit1.text ou

query1.sql.ParamByName('item').asstring := edit1.text

[Guest Guest]

Valeu, Corposemalma! vou testar e logo trarei respostas!

[lazarodm]

  Guest disse:

Valeu, Corposemalma! vou testar e logo trarei respostas!

"Obs.: esqueci de logar"

[lazarodm]

O que seria esse

  Citar

item

?

[Guest Ricardo Soares de Lima]

Este item é o parâmetro passado ao comando sql aquele : antes dele indica que ele é um parâmetro.

[Corposemalma]

Exato...

Usar parametro sempre é melhor que jogar valores na linha SQL.

Facilita na implementação, por que voce não se enrola com aquele monte de "" aspas e + Sinais de adicao

E tambem por que fica mais facil de tratar os tipos de variaveis (Date, string, boolean)...

Voce vai ver que quando precisar fazer algo um pouco mais complicado vai ter que usar parametros....

[lazarodm]

Tentei usar os dois métodos acima, mas não funcionou. Dava vários tipos de erro... E se alguém souber algum tipo de consulta que pode ser utilizado com o componente TTable, ou melhor, algumas apostilas explicando como utilizar o componente TQuery.

[KeitaroSan]

Qual o tipo de banco de dados você esta utilizando Lazarodm?

[lazarodm]

KeitaroSan, estou usando o Access!

[KeitaroSan]

Bom, eu perguntei, pois quando eu trabalho com banco de dados, a sintaxe do SQL costuma mudar pra quem esta acostumado com a do BDE, geralmente eu utilizo Access tambem, mas eu uso componente de acesso pelo Jet, espero que isso não afete o a sintaxe do SQL...

Eu faria a query de seleção da seguinte maneira:

Query1.SQL.Text := 'SELECT * FROM tabela_desejada WHERE nome_do_campo LIKE '+#39+ var_substring + '*' +#39+'

note que esse que eu pus logo apos o "var_substring" é um caracter curinga, entende?

ou seja, ele vai mostrar todos os registros que começam com o texto que esta na var_substring e terminem com qualquer coisa...

no Paradox o caracter curinga é o "%", por isso eu queria saber qual sintaxe de SQL usar...

Bom, se der erro, posta o erro aqui, mas acho dificil, sempre uso assim e nunca obtenho erro...

falows

[lazarodm]

Estamos progredindo...

Ainda não está funcionando totalmente, não dá mais nehum erro que para o programa e manda recompilar, etc.

Mas o DBGrid fica em branco, todos os campos ficam em branco, mesmo eu digitando um valor que está na tabela... Acho que só falta esse problema.

[KeitaroSan]

Tipo, como eu tow sem Access no momento, não posso te fazer um exemplo, mas quando eu testei, testei no Database Desktop e notei que ele era "Case Sensitive", ou seja, diferenciava letras maiusculas de minusculas... será que não está retornando nada por algum caso assim??

Tipo, se não funcionar bem com o '*', tenta usar o '%'... quem sabe não funciona?

[Capablanca]

Olá,

Acho que está resolvido (aqui deu certo).

Tente usar a seguinte sentença SQL no evento OnKeyUp do Edit1:

=======================================================================================

ADOQuery1.Close;

ADOQuery1.SQL.Clear;

ADOQuery1.SQL.Add('SELECT * FROM NomeDaTabela WHERE NomeDoCampo LIKE ' + #39 + Edit1.Text + '%' + #39);

ADOQuery1.Open;

=======================================================================================

Caso você ainda não consiga, me fala que eu te mando o arquivo fonte do exemplo.

Abs.

[Corposemalma]

Capablanca... não é bom utilizar o valor do edit dentro da setença SQL

O ideal é utilizar o Param, fica mais simples e dificil de se enrolar porque voce tem que ficar colocando as " aspas

[Capablanca]

  Corposemalma disse:

Capablanca... não é bom utilizar o valor do edit dentro da setença SQL

O ideal é utilizar o Param, fica mais simples e dificil de se enrolar porque voce tem que ficar colocando as " aspas

Sim, é uma outra opção. Elaborei a sentença daquele modo para ficar mais fácil para o Lázaro entender.

[Corposemalma]

Tenta fazer assim: (eu sempre tive menos problema usando params ao invés de botar o valor do edit direto na SQL...)

Query1.SQL.add(SELECT * FROM tabela_desejada WHERE nome_do_campo LIKE UPPER :param1 + %)

query1.sql.Params('0').asstring := edit1.text ou

query1.sql.ParamByName('param').asstring := edit1.text

[Capablanca]

  Corposemalma disse:

Tenta fazer assim: (eu sempre tive menos problema usando params ao invés de botar o valor do edit direto na SQL...)

Query1.SQL.add(SELECT * FROM tabela_desejada WHERE nome_do_campo LIKE UPPER :param1 + %)

query1.sql.Params('0').asstring := edit1.text ou

query1.sql.ParamByName('param').asstring := edit1.text

Beleza... Valeu pelo complemento.

[lazarodm]

Valeu pessoal, juntando um pouquinho de cada código deu pra montar a consulta do jeito que eu queria. Obrigado a todos que postaram enviando dicas e códigos...