Question

我想创建一个从Windows右下角系统托盘运行的程序。

但我不知道从哪里开始？

有人可以告诉\告诉我在哪里查看和示例或使用什么命令\ research？

Answer 1

将NotifyIcon添加到主窗体表单中。使用Resize中的Form事件来控制何时显示NotifyIcon并隐藏表单：

Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
        If Me.WindowState = FormWindowState.Minimized Then
                NotifyIcon1.Visible = true
                Me.Hide()
                NotifyIcon1.BalloonTipText = "Hi from right system tray"
                NotifyIcon1.ShowBalloonTip(500)
        End If
    End Sub

使用NotifyIcon中的事件再次显示表单：

Private Sub NotifyIcon1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles NotifyIcon1.DoubleClick
        Me.Show()
        Me.WindowState = FormWindowState.Normal
        NotifyIcon1.Visible = False
    End Sub

您可以在AutoDNIE Google代码项目

中下载完整示例

Answer 2

我查看答案，我注意到错过了图标。

Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
    If Me.WindowState = FormWindowState.Minimized Then
        NotifyIcon1.Visible = True
        NotifyIcon1.Icon = SystemIcons.Application
        NotifyIcon1.BalloonTipIcon = ToolTipIcon.Info
        NotifyIcon1.BalloonTipTitle = "Verificador corriendo"
        NotifyIcon1.BalloonTipText = "Verificador corriendo"
        NotifyIcon1.ShowBalloonTip(50000)
        'Me.Hide()
        ShowInTaskbar = False
    End If
End Sub

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

Answer 3

你也可以这样做：

Sub ToggleHide()
    If Me.WindowState = FormWindowState.Normal Then
        Me.ShowInTaskbar = False
        Me.WindowState = FormWindowState.Minimized
    Else
        Me.ShowInTaskbar = True
        Me.WindowState = FormWindowState.Normal
    End If
End Sub

创建一个从系统托盘运行的程序

3 个答案: