Tray Icon

How can I make so my program will Appear in the icon
tray and on my click pop up back to the screen?

Thanks :)

Goto www.kedaman.com and download the KedaTracy ocx including source. If you see Kedaman, thank him for it ;).

second choice go here

http://www.vbsquare.com/tips/tip178.html

I use it its great i havent tried that kedamen ine so i cant say which i think is best:) :p :mad: :cool:

i dont like the kedamen one it dont even work then it loaded like 7 tray icons on my tray. Use the tip i worte very simple all you have to do is change one line which is

Code:

---


Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

If Hex(X) = "1E3C" Then
  Me.PopupMenu menu1
End If

End Sub


---

change that to

Code:

---

Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

me.show

End Sub

---