Yes. The code is really very complex. It crashes in this loop:
(bm file)
While GetMessageA(_Offset(msg), 0, 0, 0) > 0 ' gets a message from our application's message queue.
dummyL = TranslateMessage(_Offset(msg)) ' performs some additional processing on keyboard events
dummyO = DispatchMessageA(_Offset(msg)) ' sends the message out to the window that the message was sent to
Wend
Good news. In version QB64PE 32 bit 3.12.0 works as expected.
(bm file)
While GetMessageA(_Offset(msg), 0, 0, 0) > 0 ' gets a message from our application's message queue.
dummyL = TranslateMessage(_Offset(msg)) ' performs some additional processing on keyboard events
dummyO = DispatchMessageA(_Offset(msg)) ' sends the message out to the window that the message was sent to
Wend
Good news. In version QB64PE 32 bit 3.12.0 works as expected.

