djkennethcool
Goto Top

VB 2008 Express - Programm in den Tray (Per Button)

VB 2008 Express - Programm in den Tray (Per Button)

Moin Leute,
Ich habe mal eine kleine Frage.
Und zwar will ich ein Programm in den Tray minimieren lassen, wenn ich einen Button betätige.
Info dazu:
- Ico muss im Tray angezeigt werden.
- Ein Klick auf dem Ico. Und das Programm soll wieder sichtbar sein.
Kurz gesagt wie bei jeden anderen Programm

Info zum Button:
Es ist kein normaler Button sondern ein Button im "MenuStrip" kennt ihr ja sicherlich. ;)

Programm Info:
VB Version: VB 2008 Expres
Mein Programm benötigt: Net Framework 2.0

mfg DJK

Content-Key: 154197

Url: https://administrator.de/contentid/154197

Ausgedruckt am: 29.03.2024 um 06:03 Uhr

Mitglied: Tommy70
Tommy70 02.11.2010 um 15:39:41 Uhr
Goto Top
Hallo,

dafür wäre es sehr hilfreich zu wissen von welchem VB du redest. VB6 oder .Net ;)

gruß
Tom
Mitglied: Logan000
Logan000 02.11.2010 um 15:43:08 Uhr
Goto Top
Moin Moin

Das ist ja alles ganz interessant, aber wie lautet jetzt deine genaue Frage?
Vielleicht teilst Du bei der Gelegenheit auch besser gleich mit unter welcher VB Version du das realisieren möchtest?

Gruß L.
Mitglied: DJKennethcool
DJKennethcool 02.11.2010 um 15:44:32 Uhr
Goto Top
Oh ja sorry VB 2008 Express
So ich hoffe das reicht ;)
Mitglied: DJKennethcool
DJKennethcool 02.11.2010 um 15:46:15 Uhr
Goto Top
@legoan000: Guck mal über dein Beitrag ;)
Mitglied: Tommy70
Tommy70 02.11.2010 um 15:50:49 Uhr
Goto Top
Es müsste ein Control Namens NotifyIcon in der Toolbox geben. Damit lässt sich das lösen.

Edit: Hier noch ein Link mit dem Code dazu.
Mitglied: DJKennethcool
DJKennethcool 02.11.2010 um 15:52:21 Uhr
Goto Top
Ich bräuchte nur noch ein Code.

Edit1: OK Danke werde ich ausprobieren.
Mitglied: DJKennethcool
DJKennethcool 02.11.2010 um 15:59:39 Uhr
Goto Top
So ich habe es jetzt so:

Private Sub ZumTrayMinimierenToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ZumTrayMinimierenToolStripMenuItem.Click
Hier ist die Reihe die ich meinte
End Sub

Private Sub NotifyIcon1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles NotifyIcon1.Click
Me.ShowInTaskbar = True
Me.NotifyIcon1.Visible = False
Me.WindowState = FormWindowState.Normal
End Sub

Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
If Me.WindowState = FormWindowState.Minimized Then
Me.ShowInTaskbar = False
Me.WindowState = FormWindowState.Minimized
Me.NotifyIcon1.Visible = True
End If
End Sub
End Class

Jetzt muss nur noch da wo die reihe mit den ** sind ein code rein das die Aktivietät ausgeführt wird.
Mitglied: DJKennethcool
DJKennethcool 03.11.2010 um 20:41:56 Uhr
Goto Top
OK Habe es hinbekommen nur legt sich das Programm sofort in den Tray wenn ich aufs "_" gehe.
Kann man das nicht ändern ?