Conexão Ado

[Pseudalopex 0]

Estou com uma dúvida de como fazer uma Query usando o ADOConection

 

Ja fiz toda a ligação no banco de dados, coloquei um ADOConnection1, um DataSource1 e um ADOQuery1. Ligado a um Db grid

 

no (TStrings) esta.

 

 

Select * from usuarios

Mostra todos os usuarios

Mas

Estou com problemas ja na sintaxe do comando, pois colocando o codigo abaixo já da erro

Select * from usuarios where login =: 'pseudalopex'

O que eu preciso fazer é o seguinte.

Em um edit1 o usuario digita o login e um botão executa a query e me retorna se o login existe na tabela ou nao.

 

E depois conferir com a senha dele.

 

Se alguem puder ajudar desde já agradeço.

[marcio.theis 3]

Da forma que colocou você esta tentando usa Parameters, mas vai gerar erro por causa das aspas...

Tente assim:

SELECT * FROM usuarios WHERE login =:Usuario

Cliente em Parameters e configura o campo, depois no fonte:

ADOQuery1.Close;ADOQuery1.Parameters.ParamByName('Usuario').Value:=edit1.Text;ADOQuery1.Open;if not ADOQuery1.IsEmpty then	//usuário existe

Ou pode fazer:

ADOQuery1.Close;ADOQuery1.SQL.Clear;ADOQuery1.SQL.Add('select *');ADOQuery1.SQL.Add('from usuarios');ADOQuery1.SQL.Add('where usuarios.login = ''' + edit1.Text + '''');ADOQuery1.Open;if not ADOQuery1.IsEmpty then	//usuário existe

[Pseudalopex 0]

Eu entendi sim.

Mas to me perdendo ainda.

Porque preciso pegar o valor da query. No caso o resultado da query.

Por exemplo:

Como jogo o campo e-mail do usuario selecionado pela query num edit1?

 

**********************

Editando aqui:

Descobri como é

 

Edit4.text := AdoQuery1.fieldbyname('email').asString;

[marcio.theis 3]

beleza, funcionou certinho então ?