系统托盘中显示额外的 NotifyIcon

Question

我的应用程序出现问题，其中我的 NotifyIcon 显示额外的图标。重现它的步骤很简单，但问题是，在我们添加的任何实际代码隐藏之后，都会显示额外的图标。简而言之，单击按钮会触发 FooBar() 方法的执行，该方法一路运行良好，但其主要职责是激发后台工作者登录到我们的另一个应用程序。仅当单击此特定按钮时它才会出现。

奇怪的是，我们有一个 WndProc 方法重写，如果我单步执行直到额外的 NotifyIcon 出现，它总是在此方法期间出现，因此代码隐藏之外的其他东西一定会触发该行为。我们的 WndProc 方法目前是（尽管我不认为它是由 WndProc 引起的）：

Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)

    'Check for WM_COPYDATA message from other app or drag/drop action and handle message
    If m.Msg = NativeMethods.WM_COPYDATA Then
      ' get the standard message structure from lparam
      Dim CD As NativeMethods.COPYDATASTRUCT = m.GetLParam(GetType(NativeMethods.COPYDATASTRUCT))

      'setup byte array
      Dim B(CD.cbData) As Byte

      'copy data from memory into array
      Runtime.InteropServices.Marshal.Copy(New IntPtr(CD.lpData), B, 0, CD.cbData)

      'Get message as string and process
      ProcessWMCopyData(System.Text.Encoding.Default.GetString(B))

      'empty array
      Erase B

      'set message result to 'true', meaning message handled
      m.Result = New IntPtr(1)
    End If

    'pass on result and all messages not handled by this app
    MyBase.WndProc(m)
  End Sub

代码中唯一操作有问题的 NotifyIcon 的地方是在以下事件处理程序中（再次强调，不要认为这是罪魁祸首，但只是为了更多信息）：

Private Sub TrayIcon_MouseDoubleClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles TrayIcon.MouseDoubleClick
    If Me.Visible Then
      Me.Hide()
    Else
      PositionBottomRight()
      Me.Show()
    End If
  End Sub

backgroundworker的DoWork如下（只是一个类调用来登录到我们的其他应用程序，但同样只是为了提供信息）：

Private Sub LoginBackgroundWorker_DoWork(ByVal sender As Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles LoginBackgroundWorker.DoWork
    Settings.IsLoggedIn = _wdService.LogOn(Settings.UserName, Settings.Password)
End Sub

是否有其他人知道可能导致此问题的原因或如何可能进一步调试这个？我一直在努力解决这个问题，但没有看到任何模式，所以另一双眼睛将非常感激。 :) 我也在 MSDN winforms 论坛上发布了此内容，但到目前为止也没有运气。

Answer 1

我记得几年前在一个应用程序中看到过类似的情况，该应用程序实例化了一个新的 NotifyIcon 而不释放以前的实例。