Popup fra traybaren?

Kan du bruge dette link ?

http://www.cespage.com/vb/vbdntut3.html

1. Åben et nyt projekt

2. Vælg "WindowsApplication"

3. Slæt Form1.vb

4. Tilføj en "Component Class" med navn "MyTrayApp.vb" (Add New Item -> Component Class)

5. Tilføj et "NotifyIcon" med navn "Tray" (husk at vælge et ikon)

6. Tilføj en "ContextMenu" med navn "Menu"

7. I dit NotifyIcon vælger du ContextMenu = Menu

8. I koden på MyTrayApp.vb tilføjer di følgende:


Private Running As Boolean = True

    ' Sub Main
    Public Shared Sub Main()

        ' Test om programmet allerede køre
        If Process.GetProcessesByName("MyTrayApp").GetUpperBound(0) = -1 Then
            Dim ObjMyTrayApp As New MyTrayApp()
            ObjMyTrayApp.AppRun()
        Else
            MsgBox("Programmet køre allerede", MsgBoxStyle.Exclamation)
            Application.Exit()
        End If

    End Sub

    ' Sub AppRun
    Public Sub AppRun()

        ' App menu
        Me.Menu.MenuItems.Add("Exit", AddressOf AppExit)

        ' Tray ikon
        Me.Tray.Text = "MyTrayApp"
        Me.Tray.ContextMenu = Me.Menu

        ' App loop
        Do While Me.Running
            System.Threading.Thread.Sleep(500)
            Application.DoEvents()
            ' En masse kode her :)
        Loop

        ' clean up
        Me.Menu.Dispose()
        Me.Tray.Dispose()

    End Sub

    ' Menu funktioner
    Private Sub AppExit(ByVal sender As Object, ByVal e As System.EventArgs)
        Me.Running = False
    End Sub

9. Sæt Start Object til "Sub Main" (Projecy -> Properties)

10. Kør programmet

Hejsa ...

Det var da i hvert fald svar på mit første spørgsmål! Tak!

Nogen ideer til hvordan jeg laver således, at programmet kan fortælle brugeren en tekst enten som de talebobler f.eks. Windows Netværk bruger når der er en forbindelse tilsluttet eller MSN laver sådan et firkantet vindue, når en person logger på !?!?!

dna

Kan du ikke bare bruge en Form du sætter til "Always on top" og modificere layoutet så det ligner?

Jeg har nu fået smidt mit program ned i trayen! Og det spiller fint nok! - men, kan stadig ikke finde ud af det med popup!?

Det med formen... Det er vel en mulighed, men ville nu gerne have sådan en talebobbel, men kan ikke lige se hvordan jeg skal lave det...

Det nærmeste om emnet jeg er kommet er dette.. nogen der kan se mere ud af dette end mig?! - evt. forklare mig hvordan jeg skal implementere det?

http://www.vbaccelerator.com/home/VB/Code/Libraries/Shell_Projects/SysTray_-_The_Easy_Way/article.asp

http://www.vbaccelerator.com/home/VB/Tips/TextBox_Balloon_Tips_in_XP/article.asp

dna

Hvorfor blev det nu et svar på mit eget spørgsmål?! :D

Nå... ingen hjælp her!

sys64738 hjalp med det ene problem, så halvt antal point til dig.

dna

Hej DNA

Jeg håber at du har prøvet begge eksempler da resultatet ikke er det samme.
Hvis det er et Messenger ligende program du leder efter, skal du bruge eksempel #2, hvis ikke så ...

kinggenesis: Jeg prøvede bare det, som der var via linket?

Kan du da lige forklare hvad forskellen er?!

dna

Eksempel #1:
Åbner en Form som viser et NotifyIcon. Hvis du lukker formen ned afslutter du programmet.

Eksempel #2:
Selve programmet er "usynligt" og kan kun styres gennem NotifyIcon menuen.
Du kan sagtens åbne Forms, men de lukker ikke programmet når de lukkes.
Lige præcis som Messenger.

I øvrigt:
Den kode du skriver der står der hvor jeg har skrevet "En masse kode her", bliver kørt hver halve sekund. Så hvis du vil "lytte" efter noget kan du gøre det.

Tak for det da!

Mit projekt er dog gået lidt i stå... kan ikke rigtigt finde ud af, at lave en popop som informerer brugeren om det som jeg ville. Ville jo gerne bruge de balloons, da de bare lige kommer frem og informere.. og så forsvinder af sig selv. Kan desværre bare ikke finde nogen information/eksempler passende til .NET version af VB! :-(

dna