Recherche:

Que fait la procédure ImageFenêtre(sNomFenetre,sNomRepTemp+sNomFenetre) ?
Quelle valeur retourne-t-elle ?
Est-ce bien un entier ?

Dans ton code on voit que d'autres procédures sont appelées.
Il est possible qu'à un moment donné ce soit ton code qui demande le sablier et qui après soit se met dans une boucle, soit ne pas par...

je clique sur un utilisateur ou un groupe que j'ai créer et la : apparition du sablier...

As-tu du code qui s'exécute quand tu clique sur un utilisateur ou un groupe ?
As-tu essayé de déboguer...