[Lazarus] Bug 15390 and Showmodal

[patspiper]

This is related to bug #15390:

My understanding is that Showmodal blocks until the form is closed. 
Hiding the form should have no effect.

   try
     Self.Hide;
     Form2.ShowModal; //<- this should block until Form2 is closed
   finally
     Self.Show; // <- this should not be reached until Form2 is closed
     Form2.Free;
   end;

What is happening is that Showmodal is exiting when the modal form is 
hidden.

Stephano