Ah! et aussi... j'ai pas fait mais c en route. Pour ceux qui désirent éviter le probl quand y'a plein d'applications qui font de ces fenêtres en même temps y'a le "mutex" tel que décrit là
Bon boulot 9 (et des poussières). Quelques petits changements font que ça fonctionne sous win98 (ben oui j'ai des vieilles machines aussi). Win98 retourne pas 0 pour top, left donc tester ...
If taskBar.coordonnees.Left < 1 And taskBar.coordonnees.Top < 1 Then blablabla
et ensuite win98 gère pas la transparence qui a été ajoutée mais génère une erreur 453 donc au début de la sub showSysTrayMessage(....) placer on error goto errortrap. À la fin entre le Call SetTimer(.....) et le end sub placer
Exit Sub
errortrap:
If Err.Number = 453 Then
Resume Next
Else
Err.Raise Err.Number
End If
A force d'avoir pleins de prog qui font les mêmes messages, on aura plus de place pour les mettre ou on en vera qu'un sur 40 s'ils se superposent :p
Sinon, c'est bien, bon boulo ;)
j'ai pas testé mais est ce que ça décale la fenêtre plus haut si on en affiche plusieurs ?
et si oui est ce que ça fait ça aussi si msn affiche une fenêtre en même temps ?
sinon je vais essayer de la tester bientot.
@ +
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/WinMessenger/winmessenger/overview/toast.asp
Pour coordonner un système de "toast pop up" de ce genre.
J'ai pas fouillé si ça a déjà été posté ici mais bon. J'viens de voir que le code date de 2004 alors bien possible que tout ça soit déjà là qq part.
If taskBar.coordonnees.Left < 1 And taskBar.coordonnees.Top < 1 Then blablabla
et ensuite win98 gère pas la transparence qui a été ajoutée mais génère une erreur 453 donc au début de la sub showSysTrayMessage(....) placer on error goto errortrap. À la fin entre le Call SetTimer(.....) et le end sub placer
Exit Sub
errortrap:
If Err.Number = 453 Then
Resume Next
Else
Err.Raise Err.Number
End If