Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Visual Basic 6 - trayicon
Forum - Visual Basic 6 - trayicon

Avatar
carmines92 (Normal User)
Pro


Messaggi: 83
Iscritto: 10/04/2007

Segnala al moderatore
Postato alle 21:25
Martedì, 20/11/2007
raga mi spiegate come mettere un programma in trayicon?!? Grazie 1000!!

PM Quote
Avatar
gius (Ex-Member)
Expert


Messaggi: 294
Iscritto: 20/06/2007

Segnala al moderatore
Postato alle 7:25
Mercoledì, 21/11/2007
In un button per diventare trayicon

Codice sorgente - presumibilmente VB.NET
  1. T.cbSize = Len(T)
  2. T.hWnd = pichook.hWnd
  3. T.uId = 1&
  4. T.uFlags = NIF_ICON Or NIF_TIP Or NIF_MESSAGE
  5. T.ucallbackMessage = WM_MOUSEMOVE
  6. T.hIcon = imgOne.Picture
  7. T.szTip = "Recent" & Chr$(0)
  8. Shell_NotifyIcon NIM_ADD, T
  9. Me.Hide
  10. End Sub
  11. Me.WindowState = 1


In un modulo bas
Codice sorgente - presumibilmente VB.NET
  1. Private Type NOTIFYICONDATA
  2. cbSize As Long
  3. hWnd As Long
  4. uId As Long
  5. uFlags As Long
  6. ucallbackMessage As Long
  7. hIcon As Long
  8. szTip As String * 64
  9. End Type
  10.  
  11. Private Const NIM_ADD = &H0
  12. Private Const NIM_MODIFY = &H1
  13. Private Const NIM_DELETE = &H2
  14. Private Const WM_MOUSEMOVE = &H200
  15. Private Const NIF_MESSAGE = &H1
  16. Private Const NIF_ICON = &H2
  17. Private Const NIF_TIP = &H4
  18.  
  19. Private Const WM_LBUTTONDBLCLK = &H203
  20. Private Const WM_LBUTTONDOWN = &H201
  21. Private Const WM_LBUTTONUP = &H202
  22. Private Const WM_RBUTTONDBLCLK = &H206
  23. Private Const WM_RBUTTONDOWN = &H204
  24. Private Const WM_RBUTTONUP = &H205
  25.  
  26. Private Declare Function Shell_NotifyIcon Lib "shell32" Alias "Shell_NotifyIconA" (ByVal dwMessage As Long, pnid As NOTIFYICONDATA) As Boolean
  27. Dim T As NOTIFYICONDATA


E copia questo nel bottone per farlo ritornare normale

Codice sorgente - presumibilmente Plain Text
  1. T.cbSize = Len(T)
  2. T.hWnd = pichook.hWnd
  3. T.uId = 1&
  4. Shell_NotifyIcon NIM_DELETE, T
  5. Me.Show

__________________________________________________
Sono il nuovo mod di questa sezione:D:D

PM Quote