Sub Process_Globals
Private fx As JFX
Private MainForm As Form
Dim lsv As ListView
End Sub
Sub AppStart (Form1 As Form, Args() As String)
MainForm = Form1
lsv.Initialize("lsv")
MainForm.RootPane.LoadLayout("lay1") 'Load the layout file.
MainForm.RootPane.AddNode(lsv, 0, 0, 100, 100)
lsv.Items.Add("Hello")
MainForm.Show
MainForm.RootPane.SetAnchors(lsv, (MainForm.Width/2)- lsv.Width, (MainForm.Height/2) - lsv.Height, (MainForm.Width/2) - lsv.Width, (MainForm.Height/2) - lsv.Height)
End Sub