3

（范围：C# 和 VB.NET，尽管这里的代码在 VB.NET 中。）

我的 WinForms 应用程序运行良好，直到第一次挂起和恢复PC。恢复后，某些事件处理程序将被忽略。

记录机制记录先挂起和先恢复。同样，VisualStudio 中的断点在Sub PowerModeChanged()第一次挂起和恢复后停止。但他们再也不会这样做了。

Sub PowerModeChanged()永远不会再被调用。
Sub FeedRawInput()再也不会被调用，并且击键会转到标准的 WinForms 处理程序，否则这些处理程序在我的应用程序中是不活动的。

我没有搞乱任何系统调整，它是非常标准的 WinForms MDI 应用程序。知道什么可以杀死一些内部绑定，以便在恢复后永远不会调用事件吗？

如果我重新启动应用程序，一切都会立即再次正常运行......直到暂停恢复。

Sub Initialize() 'called from MainForm_Load()
    If AreAllSettingsMissing() Then PushAllDefaultSettings() 'needs database connections available
    AddHandler Microsoft.Win32.SystemEvents.PowerModeChanged, AddressOf PowerModeChanged

    _rawInput = New RawInputProcessor.RawFormsInput(My.Application.OpenForms(0),
                                                    RawInputProcessor.RawInputCaptureMode.Foreground)
    AddHandler _rawInput.KeyPressed, AddressOf FeedRawInput
End Sub

'my attempt to log suspend/resume and to rebuild USB scanner support
Sub PowerModeChanged(sender As Object, e As Microsoft.Win32.PowerModeChangedEventArgs)
    clsLogging.Log(String.Format("{0}:{1}:{2}", sender.ToString(), [Enum].GetName(GetType(Microsoft.Win32.PowerModes), e.Mode), _rawInput.ToString()))
    If e.Mode <> Microsoft.Win32.PowerModes.Resume Then Return
    'bring all down
    If _rawInput Is Nothing Then Return
    _rawInput.Dispose()
    _rawInput = Nothing
    RemoveHandler _rawInput.KeyPressed, AddressOf FeedRawInput 'problem 1 - called too late

    'restore all back
    _rawInput = New RawInputProcessor.RawFormsInput(My.Application.OpenForms(0),
                                                    RawInputProcessor.RawInputCaptureMode.Foreground)
    AddHandler _rawInput.KeyPressed, AddressOf FeedRawInput
End Sub


Sub FeedRawInput(sender As Object, e As RawInputProcessor.RawInputEventArgs)
    'push raw input key attributes into processing queue where 
    'each detected USB keyboard has its own async processing queue,
    'marshalling complete keystroke or scan back to main thread - standard stuff
End Sub

关于 RawInput 库，我已经移植了这个（C#->VB），它是这个的一个分支。目前我不知道创建隐藏窗口（什么库用于捕获消息）是否可以在问题中发挥任何作用。（但它处理键盘，为什么还要忽略电源事件？）当我在小型 WPF 项目中测试库时，它可以很好地恢复。我还没有做独立库的 WinForms 测试。

如果您有任何快速提示在哪里检查而不是冗长地拆除所有东西，分离应用程序以便于诊断等，请告诉我。

9小时后更新：

  • problem 1之前移动标记的线时取得了轻微的改进Dispose()。调试器不再奇怪地丢失跟踪。
  • 删除我的多线程 USB 键盘解码器后，总是调用处理程序PowerModeChanged()（不再忽略）。现在它可以在suspend-resume 中存活。
4

1 回答 1

0

Suspend除了终止所有工作线程并在接收事件时删除全局处理程序之外，我没有找到解决方案（解决方法？） 。计算机恢复后，Resume在我的应用程序中接收事件时，我可以重新创建所有侦听器并重新添加全局处理程序。（听众还不够，处理程序也需要“刷新”。）应用这种方法后，它开始正常工作。

Sub PowerModeChanged(sender As Object, e As Microsoft.Win32.PowerModeChangedEventArgs)
    clsLogging.Log(String.Format("{0}:{1}:{2}",
                                 sender.ToString(),
                                 [Enum].GetName(GetType(Microsoft.Win32.PowerModes), e.Mode),
                                 Threading.Thread.CurrentThread.GetHashCode()))
    Select Case e.Mode
        Case Microsoft.Win32.PowerModes.Suspend
            My.Application.Scanners.Suspend()
                'inside: 1) send termination request to all threads
                '        2) clear USB keyboard map and any other references
                '        3) remove global raw keyboard event handler
                '        4) destroy instance of rawInput engine
        Case Microsoft.Win32.PowerModes.Resume
            My.Application.Scanners.Resume()
                'inside: undo (rebuild) steps 4, 3, 2, 1 seen in Suspend()
    End Select

    'debug printout: see list of all thread-powered device readers
    Dim logEntry As String = ""
    For Each key As IntPtr In My.Application.Scanners.Devices.Keys
        logEntry &= String.Format("{0} {1} ", key, My.Application.Scanners.Devices(key))
    Next
    clsLogging.Log(logEntry)
End Sub
于 2015-02-06T04:41:28.457 回答