Sub Process_Globals
Private fx As JFX
Private MainForm As Form
End Sub
Sub AppStart (Form1 As Form, Args() As String)
MainForm = Form1
'MainForm.RootPane.LoadLayout("Layout1") 'Load the layout file.
MainForm.Show
CallSub(Me, "ShortName")
CallSub(Me, "LongName01234567890123456789012345678901234567890123456789")
End Sub
'Return true to allow the default exceptions handler to handle the uncaught exception.
Sub Application_Error (Error As Exception, StackTrace As String) As Boolean
Return True
End Sub
'LongName01234567890123456789012345678901234567890123456789
Sub LongName01234567890123456789012345678901234567890123456789
End Sub
'ShortName
Sub ShortName
End Sub