[Gambas-bugtracker] Bug #1881: Control errors when getting too small

[bugtracker at gambaswiki.org]

http://gambaswiki.org/bugtracker/edit?object=BUG.1881&from=L21haW4-

Comment #1 by Bruce STEERS:

Ps.
I found using this code (not Modal mode) The form still goes below the required minimum size but the controls do not and do not give the errors. This code works but doesn't seem right to me.

Public Sub Form_BeforeArrange()
If Me.Width < 600 Then Me.width = 600
If Me.Height < 350 Then Me.Height = 350
Me.Refresh
End

Public Sub Form_Resize()
HSplit1.Layout = [200, Me.width - 200]
If Me.Width < 600 Then Stop Event
If Me.Height < 350 Then Stop Event
Me.Refresh
End


Many thanks.
Bruce