Double click in TListBox to do ShowModal causes loss of focus

Original Reporter info from Mantis: stinkypete

• Reporter name: Dan Hallock

Description:

The sequence of events is:

    Double click in a TListBox
    Display another form via showmodal
    Exit the showmodal form

At this point, the original form with the TListBox is displayed but the keyboard no longer works (focus lost?). You cannot use arrows, tab, escape. Nothing appears to work.

If you use the mouse, the first click is ignored. Click again and then the first click is registered.

Steps to reproduce:

To replicate this error in the attached project:

    In FormA click DoIt
    In FormB double click "Double Click Test1"
    In FormC press ESC or click on Exit

At this point you should be able to press ESC to return to FormA. That does not work. In fact nothing seems to work using the keyboard.

Further, if you click on exit, the button is highlighted, but no exit occurs. Now click anywhere in the form and the exit will occur.

Note that if, in FormB you click on DoIt or Click on "Single Click Test" TListBox, the problem will not occur.

Mantis conversion info:

• Mantis ID: 36266
• OS: macOS
• OS Build: 10.14
• Platform: darwin
• Version: 2.0.6
• Fixed in revision: 62204 (#727b8764)
• Monitored by: » stinkypete (Dan Hallock)