Busca em IBDataset

Delphi

18/02/2004

Alguem poderia me ensinar como faço uma busca em um IBDataSet? Fiz sempre usei eles para cadastro e queria saber como fazer busca em Sql com eles.

Atenciosamente

Luiz Claudio


Luiz.claudio.vieira

Luiz.claudio.vieira

Curtidas 0

Respostas

Andremuller

Andremuller

18/02/2004

Pelo que entendi você só quer realizar um consulta com o IBDataSet,
Então é só escrever a SQL de consulta no SQLSelect dele.

É isso?


GOSTEI 0
Luiz.claudio.vieira

Luiz.claudio.vieira

18/02/2004

Eu sei disso, mas como mudo a busca SQL em tempo de execução? Pq o cliente vai digitar em um Edit o que ele quer que busca, por exemplo, o nome de um cliente.

Atenciosamente

Luiz Claudio


GOSTEI 0
Andremuller

Andremuller

18/02/2004

Faz assim,

IBDataSet1.Close;
IBDataSet1.SelectSQL.Clear;
IBDataSet1.SelectSQL.Add(´Tua SQL de Consulta´);
IBDataSet1.Open;

Era isso?


GOSTEI 0
Luiz.claudio.vieira

Luiz.claudio.vieira

18/02/2004

Infelismente nao, eu tenho de pegar a informação que vai ser ´buscada´ no banco de dados, que o usuario digitou no Edit e jogar entro de uma variavel SQL.


GOSTEI 0
Andremuller

Andremuller

18/02/2004

Tá, vamo vê se eu entendi,

digamos que tu tenha uma tabela Cliente com o campo CódigoCliente e o usuário entra com o código do cliente no edit e clica lá em um botão de busca. O código do botão seria o seguinte:

IBDataSet1.Close;
IBDataSet1.SelectSQL.Clear;
IBDataSet1.SelectSQL.Add(´select * from CLIENTE where
CODIGOCLIENTE = :CODIGOCLIENTE´);
IBDataSet1.ParamByName(´CODIGOCLIENTE´).AsInteger :=
StrToInt(edit1.text);
IBDataSet1.Open;

Fechou agora?


GOSTEI 0
POSTAR