TForm.ShowModal on WinCE loops itself

Original Reporter info from Mantis: bazic

• Reporter name: Przemyslaw Dmochowski

Description:

When running a program with a form created in an onClick event and then shown as modal - application hangs in an infinite loop triggering onShow event.

It happens in WinCE widgetset, but not in Win32.

In 1.6.4 it was correct, error discovered also in 1.8RC3 (I did not test older RC's of 1.8)

Steps to reproduce:

try to compile and run attached project.

Additional information:

I tried to change borderstyle from none to something else but it did not help.

Also in 1.6.4 it worked fine.

Mantis conversion info:

• Mantis ID: 32366
• OS: WinCE
• OS Build: 6.0
• Platform: WinCE
• Version: 1.8RC4
• Fixed in revision: 58432 (#6bb3d980)
• Monitored by: » bazic (Przemyslaw Dmochowski)