fenêtre avec timeout GtkAda

Bonjour,
J'ai attaché un timeout à une fonction qui selon un cas doit ouvrir une nouvelle fenêtre.

Mon problème est que le programme affiche la nouvelle fenêtre mais poursuie l'exécution de la fonction attaché au timeout.

Je dois mal m'y prendre ... Comment poursuivre.
J'ai essayé d'enlever le timeout avant d'ouvrir la nouvelle fenêtre et de le remetre après mais ça change rien.