用 adoqyery update 错误了

  with TADOQuery.Create(nil) do
  begin
    try
      Close;
      SQL.Clear;
      SQL.Add('update 新生表 set 公寓代码=:no1 where 姓名=:name1');
      Parameters.ParamByName('no1').Value := StrToInt(cbb1.Text);     //说这里找不到参数no1
      Parameters.ParamByName('name1').Value := qry1.FieldByName('姓名').AsString;
      ExecSQL;
    finally
      Free;
      qry1.Refresh;
    end;
  end;