Gå til innhold

Fjern tray iconet til programet mitt?


Anbefalte innlegg

Hei!

Takker på forhold for alle svar! :tease:

 

 

 

 

Hei jeg holder på med et program som sender iconet ned i Tray vinduet!

Jeg har brukt en modul(Ligger ved!) som gjør det enkelt! Jeg bruker denne koden(Under) Til å sende iconet og menyen ned til tray vinduet:

 

Private Sub Form_Unload(Cancel As Integer)
AddToTray Me, mnuTray
SetTrayTip "Chat (Klient)"
Me.Hide
Cancel = 1
End Sub

 

Problemet er at jeg skal ha bort iconet når jeg klikker på Open i menyen "mnuTray"

menyen heter "mnuOpen"

 

Hva skal jeg gjøre? Det er noe som heter "RemoveFromTray" Men det avslutter hele programet!(Inkl. VB hvis man tester det) Kan noen hjelpe meg?

her.zip

Endret av data971
Lenke til kommentar
Videoannonse
Annonse

Men foresten!

For alle dere som ikke kan med å legge til "Tray icon" men vil lære det så se her:

 

 

1. Legg til modulen jeg la till i første Innlegg

 

2. Skriv koden under for å hente fram en meny du har laget i "Menu editor" kalt "mnuTray"

 

Private Sub Command1_Click()
AddToTray Me, mnuTray
SetTrayTip "Skriv inn hva som skal stå når man holder musen over iconet!"
Me.Hide
End Sub

 

3. For å fjerne ikonet igjen skriv inn koden under!

 

Private Sub Command2_Click()
RemoveFromTray
Me.Show
End Sub

Endret av data971
Lenke til kommentar

Opprett en konto eller logg inn for å kommentere

Du må være et medlem for å kunne skrive en kommentar

Opprett konto

Det er enkelt å melde seg inn for å starte en ny konto!

Start en konto

Logg inn

Har du allerede en konto? Logg inn her.

Logg inn nå
×
×
  • Opprett ny...