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 - Tray Icon con icona personalizzata
Forum - Visual Basic 6 - Tray Icon con icona personalizzata

Pagine: [ 1 2 3 4 5 ] Precedente | Prossimo
Avatar
polpy87 (Normal User)
Newbie


Messaggi: 2
Iscritto: 11/02/2008

Segnala al moderatore
Postato alle 14:09
Lunedì, 11/02/2008
salve a tutti, ho letto l'articolo al seguente link.
http://www.pierotofy.it/pages/extras/forum/6/25029-trayicon/

Ma quando inserisco il codice per far diventare il form nella taskbar mi restituisce errore nella seguente riga:

T.hWnd = pichook.hWnd

T.hIcon = imgOne.Picture

dicendo "necessario oggetto".
Ora come posso fare?

PM Quote
Avatar
polpy87 (Normal User)
Newbie


Messaggi: 2
Iscritto: 11/02/2008

Segnala al moderatore
Postato alle 14:23
Lunedì, 11/02/2008
ho risolto, grazie lo stesso.

PM Quote
Avatar
Shutdown (Founder Member)
Guru


Messaggi: 1212
Iscritto: 10/09/2005

Segnala al moderatore
Postato alle 15:04
Lunedì, 11/02/2008
Come hai risolto?
Qual era il problema?
Spiega, per piacere...
Potrebbe servire ad altri.

Ultima modifica effettuata da Shutdown il 11/02/2008 alle 15:05
PM Quote
Avatar
GrG (Member)
Guru^2


Messaggi: 3430
Iscritto: 21/08/2007

Segnala al moderatore
Postato alle 11:49
Lunedì, 05/05/2008
Scusate se riprendo questo vecchi post ma anche io vorrei sapere come mettere un prog in TrayIcon.
Diciamo che ci sono riuscito aggiustando il codice di gius, infatti ne lform ho messo:
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
  28. Private Sub Command1_Click()
  29. T.cbSize = Len(T)
  30. T.hWnd = Me.hWnd
  31. T.uId = 1&
  32. T.uFlags = NIF_ICON Or NIF_TIP Or NIF_MESSAGE
  33. T.ucallbackMessage = WM_MOUSEMOVE
  34. T.hIcon = Me.Icon
  35. T.szTip = "Recent" & Chr$(0)
  36. Shell_NotifyIcon NIM_ADD, T
  37. Me.Hide
  38. End Sub
  39.  
  40. Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
  41. T.cbSize = Len(T)
  42. T.hWnd = Me.hWnd
  43. T.uId = 1&
  44. Shell_NotifyIcon NIM_DELETE, T
  45. Me.Show
  46. End Sub



e tutto funziona alla grande, ma se per esempio voglio che il progr. ritorni normale quando gli viene fatto un doppio click come faccio?

p.s. Ho provato a mettere il codice per mostrare la form nel Form_DblClick() solo che nn funziona :S :S
-----------------------------------------------
Ho appena capito che devo usare la costante:
WM_LBUTTONDBLCLK

ma come?

Ultima modifica effettuata da GrG il 05/05/2008 alle 12:00
PM Quote
Avatar
Reinhard (Normal User)
Newbie


Messaggi: 6
Iscritto: 01/09/2008

Segnala al moderatore
Postato alle 2:12
Lunedì, 01/09/2008
Scusate potreste spiegare meglio come si fa?

Io a un form ho aggiunto un commandbutton e vorrei che come premessi il commandbutton , il form/programma vada in trayicon...

come si fa?

PM Quote
Avatar
GrG (Member)
Guru^2


Messaggi: 3430
Iscritto: 21/08/2007

Segnala al moderatore
Postato alle 9:13
Lunedì, 01/09/2008
Allora in teroia non dovresti rispondere a topic così vecchi ma crearne uno nuovo...
cmq guarda qui:
http://support.microsoft.com/kb/176085

PM Quote
Avatar
super rambo (Normal User)
Pro


Messaggi: 135
Iscritto: 04/06/2008

Segnala al moderatore
Postato alle 11:30
Lunedì, 01/09/2008
salve, anche a me interessa ridure in trayicon un form, ho utilizzato il codice del link che ha postato GrG e funziona, però il form viene ridotto in trayicon alla pressione del pulsante che dovrebbe ridurre a icona. Si potrebbe fare in modo di creare un command vicino al tasto che riduce a icona che riduce in trayicon?? Spero di essermi spiegato.. Grazie!!

PM Quote
Avatar
GrG (Member)
Guru^2


Messaggi: 3430
Iscritto: 21/08/2007

Segnala al moderatore
Postato alle 11:43
Lunedì, 01/09/2008
Ah ma tu intendi tipo in emule?

Se è così penso non si possa fare, ma lo puoi mettere in un command nel form

PM Quote
Avatar
super rambo (Normal User)
Pro


Messaggi: 135
Iscritto: 04/06/2008

Segnala al moderatore
Postato alle 11:45
Lunedì, 01/09/2008
si io intendevo proprio in quel modo... ho provato anche a modificarlo per metterlo in un command ma non ci sono riuscito. Se come emule non si può fare mi dici come devo fare per farlo in un command?? Grazie!!

PM Quote
Pagine: [ 1 2 3 4 5 ] Precedente | Prossimo