Control.Visible problem in optimise compile

[agraham]

If TextBox1 and Table1 are added at design time then this code leaves the controls visible when run from the optimising compiler. The IDE and legacy compile leaves them invisible as expected.

Sub App_Start
	Form1.Show
	Msgbox("1")
	Table1.dispose
	TextBox1.Dispose
	AddTable("Form1","Table1",20,20,100,100)
	AddTextBox("Form1","TextBox1",20,150,100,22,"")
	Table1.Visible=false	
	TextBox1.Visible=false	
End Sub

This code, adding the initial controls at runtime works fine in the optimising compiler.

Sub App_Start
	Form1.Show
	AddTable("Form1","Table1",0,0,100,100)
	AddTextBox("Form1","TextBox1",0,150,100,22,"")
	Msgbox("1")
	Table1.dispose
	TextBox1.Dispose
	AddTable("Form1","Table1",20,20,100,100)
	AddTextBox("Form1","TextBox1",20,150,100,22,"")
	Table1.Visible=false	
	TextBox1.Visible=false	
End Sub

[Erel]

Thanks agraham.
This is the same bug that caused the problem in the original thread.
It will be fixed in the next release (one week from now).