[microbiano]

hola tengo el siguiente codigo.

Código Delphi [-]
procedure TForm1.BaceptarClick(Sender: TObject);
var wusuario,wcontrasena: string;
begin
if trim(txtusuario.Text)='' then
 begin
   Application.MessageBox('Nombre de Usuario','Error',MB_ICONSTOP);
   txtusuario.SetFocus;
   Exit;
 end;
 if trim(txtcontra.Text)='' then
  begin
    Application.MessageBox('contraseña para el usuario','Error',mb_iconstop);
    txtcontra.SetFocus;
    exit;
  end;
  wusuario:=trim(txtusuario.Text);
  wcontrasena:=trim(txtcontra.Text);
  //valido que el usuario y contraseña existan en la base de datos
 with fmodul.Query_val_usuario do
  begin
    //SQL.Clear;
    SQL.Add ('select nombre,contra from usuario');
    SQL.Add ('WHERE nombre=:us');
    {SQL.Add('AND .NumRecibo = 810375');}
    Parameters.ParamByName('us').Value := wusuario;
    ExecSQL;
  end;

end;

sin embargo a ejecutar la consulta me uestra el siguiente error:

Código Delphi [-]
project fallo.exe raised exception class EDatabaseError With Message 'Query_val_usuario: Parameter 'us'
not Found'. Process Stoped. Use Step or run to continue

alguien tiene una idea del por que me dice que el parametro no es encontrado?

muchas gracias