King Willem-Alexander loses his tie at homeless shelter