[[Caral]]

Hola
Mira esto:
Antes de copiar y pegar solo ponle la linea del mensaje y revisa el dato, luego copia y pega el codigo completo y revisalo otra vez.

Código Delphi [-]
with qryConsulta  do
    begin
      Active := False;
      SQL.Clear;
      SQL.Add(' SELECT NUM_USUAR,NOMBRE,CLAVE,USUARIO FROM USUARIOS ');
      SQL.Add(' WHERE CLAVE = :CLAV AND USUARIO = :USUA ');
      Showmessage(qryConsulta.sql.text); // aqui 
      Parameters.ParamByName('CLAV').Value := edtClave.Text;
      Parameters.ParamByName('USUA').Value := EdtUsuario.Text;
      Active := True;
     end;

Saludos