pasar parametro

[lucasarts_18]

Hola:

Intenta con parameters, según la ayuda de delphi éste sirve para pasar parametros a las sentencias SQL, con respecto FieldByName es para trabajar con registros especificos de la base de datos.

Saludos.
Aarón.

[DaDelphi]

Prueba de la siguiente manera:

Dm1.QUsuario.Active := False;
Dm1.QUsuario.SQL.Text := 'SELECT * FROM USUARIO WHERE USUARIO =:Us AND PASWORD =:Pas';
Dm1.QUsuario.ParamByName('Us').AsString := EditUsuario.Text;
Dm1.QUsuario.ParamByName('Pas').AsString := EditPasword.Text;
Dm1.QUsuario.Active := True;

[Sinonimo]

Empezado por DaDelphi

Prueba de la siguiente manera:

Dm1.QUsuario.Active := False;
Dm1.QUsuario.SQL.Text := 'SELECT * FROM USUARIO WHERE USUARIO =:Us AND PASWORD =:Pas';
Dm1.QUsuario.ParamByName('Us').AsString := EditUsuario.Text;
Dm1.QUsuario.ParamByName('Pas').AsString := EditPasword.Text;
Dm1.QUsuario.Active := True;

No sé si te funcionó de esta manera, pero a mí no (si estás usando ADO como dices), por lo que te recomiendo otra forma:
Dm1.QUsuario.Parameters.Value := EditUsuario.Text;
Dm1.QUsuario.Parameters.Value := EditPasword.Text;