Parametro para SQL

[alexandipires 0]

Como faço para passar o conteudo digitado em uma TEdit para uma consulta SQL. Para realizar a query com este valor da TEdit. http://forum.imasters.com.br/public/style_emoticons/default/excl.gif

[proteus 0]

você tem algumas opções...uma delas eh gerar um sql dinamico...passando os valores como constantes...tipoquery.sql.clear;query.sql.text:='select * from tabela where campo='''+edit1.text+'''';query.open;sacou?a outra.. eh declarar parametros...você vai na sua query vai em sql e colocaselect * from tabela where campo=:parametronaum esquecendo que o : representa o parametro...quando você fizer issovocê vai em parametrs... e fala o tipo do seu parametro e tal...depois quando você for executar..você fecha a query... e colocaquery.parambyname('parametro').value:=edit1.text;query.open;eu prefiro gerar sql dinamico...

[ilsonjunior 0]

bem, como estou com uma dúvida parecida, resolvi colocar no mesmo tópico. estou querendo filtrar a tabela e os resultados jogar para um dbgrid com a consulta em sql. minha linha esta da seguinte maneira:procedure TFbusca.SpeedButton1Click(Sender: TObject);beginsqlclientDataSet1.Close;sqlclientDataSet1.Params[0].Value := strtoint(edit1.text);sqlclientDataSet1.CommandText := 'select * from tbldados where numerovp = num';sqlclientDataSet1.Open;SQLClientDataSet1.Refresh;end;quando clico no botão para fazer a busca aparece o seguinte erro:'List index out of bounds(0)'o que fazer??

[andrealoisio 1]

O sqlclientDataSet1.Params[0] está vazio tente utilizarsqlclientDataSet1.ParamByName('nome_do_parametro').value := ...Abraços

[ilsonjunior 0]

tentei isso e não aceitou o comando. será o problema com o componente? algum outro componente poderia resolver meu problema?

[andrealoisio 1]

sqlclientDataSet1 é um DataSet ou uma TQuery??

[ilsonjunior 0]

falar a verdade pra voce eu nao sei nao. sou novato no assunto.

[andrealoisio 1]

Clica no objeto e olhe no Object Inspector, dai você consegue ver que tipo de objeto é

[@beto 0]

Fala ai gente...

 

 

tenta assim..

 

procedure TFbusca.SpeedButton1Click(Sender: TObject);

begin

sqlclientDataSet1.Close;

sqlclientDataSet1.CommandText := 'select * from tbldados where numerovp =:num';

sqlclientDataSet1.Params[0].Value := strtoint(edit1.text);

sqlclientDataSet1.Open;

SQLClientDataSet1.Refresh;

end;

 

o parametro tem que ir depois da string do sql.

 

http://forum.imasters.com.br/public/style_emoticons/default/joia.gif