Query Passagem de Par�metro SSoooocccooorrooo!!!!!!!!

Question

como montar SQL com:par�metro e com LIKE ????[b:7cff683a88]vejam o que fiz, mas n�o funciona!!!: [/b:7cff683a88] :arrow: SELECT nome FROM Pessoa WHERE nome LIKE :dados[b:7cff683a88]vejam a passagem:[/...

Anonymous · Answer

Oi,

D� uma olhada

with Query1 do begin
Sql.Clear
Sql.Add(�SELECT nome FROM Pessoa WHERE upper(nome) LIKE upper (:dados) �);
ParamByName(�nome�).asString := Edit1.text;
Close;
Open;
End;

Fui

Anonymous · Answer

Somente um acr�scimo � resposta do [b:9a74d8aa76]Visitante[/b:9a74d8aa76]:
Do jeito que est� somente ir� encontrar se o item procurado for digitado EXATAMENTE igual ao que foi cadastrado.
Utilize o caracter �� como curinga. Por exemplo:

Query1.ParamByName(�nome�).asString := Edit1.text+��;

Se no Edit1 tiver sido digitado �MARIA�, ser�o mostrados todos os nomes que iniciam com MARIA. Verifique tamb�m se a busca faz diferen�a entre mai�sculas e min�sculas.

Ilanocf · Answer

Ol� Monique,Eu trabalho com Access e agora estou migrando para Delphi, portanto, n�o sou nenhum grande programador em Delphi, mas pelos trabalhos q j� fiz minha consulta foi resolvida da seguinte forma:DMDados.ConsDiplomas.Close; DMDados.ConsDiplomas.SQL.Clear; DMDados.ConsDiplomas.SQL.Add(�SELECT * FROM TB_Concludentes WHERE Curso LIKE:P1 ORDER BY Aluno�); DMDados.ConsDiplomas.Parameters.ParamByName(�P1�).Value:=Edit2.Text;DMDados.ConsDiplomas.Open;DMDados � o nome do meu DataModule, assim todas as tabelas e consultas ficam centralizadas em um s�lugar, � como uma caixinha, e se precisar ser colocado em Rede n�o dar� problemas para conect�-las.Na terceira linha pe�o para localizar o campo Curso e organizar minha consulta pelo nome do aluno em ordem crescente, mas acho q j� sabe disso tb.Na quarta linha, � usado Parameters antes de ParamByName por se tratar de tabela Access, se fosse tabela Paradox n�o necessitaria do Parameters.Boa sorte e um feliz carnaval.Ilano....

Anonymous · Answer

Valeu rapazes, com a gentil ajuda de voc�s eu CONSEGUI!!! :arrow:  Monique Farias...

Anonymous · Answer

[quote:94204f6072=�Anonymous�]Oi,   D� uma olhada  with Query1 do begin    Sql.Clear    Sql.Add(�SELECT nome FROM Pessoa WHERE upper(nome) LIKE upper (:dados) �);    ParamByName(�nome�).asString := Edit1.text;    Close;    Open;  End;Fui[/quote:94204f6072]Como fa�o para incluir mais de um parametro no caso acima?...

Paulino · Answer

Voc� teve a resposta, por�m, creio que n�o a que voc� queria. Para ter mais de um par�metro em sua pesquisa voc� deve adicion�-los, em seu c�digo SQL pelas condi��es creio que j� conhecidas por voc� (AND ou OR)
Assim poderiamos ter:

With Query1 do
begin
Close;
SQL.Clear;
SQL.Add(�Select * from Tabela Where (Parametro1=:Parametro1 AND Parametro2=:Parametro2 AND Parametro3=:Parametro3) �);
Parameters.ParamByName(�Parametro1�).Value:=ValorDoParametro1;
Parameters.ParamByName(�Parametro2�).Value:=ValorDoParametro2;
Parameters.ParamByName(�Parametro3�).Value:=ValorDoParametro3;
Open;
end;

Onde os par�nteses antes dos par�metros s�o para indicar prioridade, caso use OR entre AND�s... os AND�s podem ser OR�s e no c�digo podem estar inclusos tamb�m Order by, Group By, ap�s as condi��es... dependendo dos tipos de dados deve-se tamb�m modific�-los...
para mais escreva-me... paulino@usa.com

:wink:

Anonymous · Answer

Eu nao uso ADO mas acredito que isso funcione:

TIBQUERY.SQL.CLEAR;
TIBQUERY.SQL.ADD(�

select campo from tabela
where campo like ��+EDIT1.TEXT+�� );

TIBQUERY.CLOSE;
TIBQUERY.OPEN;

tem que ser sql dinamico para passar o parametro edit1.text.

Se funcionar e quiser trocar uma ideia sobre o delphi
pode escrever para flmzsjlle@yahoo.com.br meu nome e Francisco