[[Caral]]

Hola
Aparte de todo, no me gusta ni el add y el parambyname

Código Delphi [-]
with qryConsulta  do
    begin
      Active := False;
      SQL.text:= ' SELECT NUM_USUAR, NOMBRE, CLAVE, USUARIO FROM USUARIOS '+
                 ' WHERE CLAVE = :C AND USUARIO = :U ';
      Parameters[0].Value := edtClave.Text;
      Parameters[1].Value := EdtUsuario.Text;
      Active := True;
     end;

Saludos