Sub Process_Globals
Private fx As JFX
Private MainForm As Form
Dim ct(4) As ClassTest
End Sub
Sub AppStart (Form1 As Form, Args() As String)
MainForm = Form1
'MainForm.RootPane.LoadLayout("Layout1") 'Load the layout file.
MainForm.Show
ct(0).Initialize
'ct(0).destroy or reinitialize
'ct (1), ct (2) and ct (3) must remain intact.
End Sub