Sub Process_Globals
Private fx As JFX
Private MainForm As Form
End Sub
Sub AppStart (form1 As Form, Args() As String)
MainForm = form1
MainForm.Show
End Sub
Sub MainForm_Resize(w As Double, h As Double)
Dim p, p1 As Pane
Dim b As Button
p.Initialize("")
CSSUtils.SetBackgroundColor(p,fx.Colors.Blue)
p1.Initialize("")
CSSUtils.SetBackgroundColor(p1,fx.Colors.Cyan)
p.AddNode(p1, 150,50,100,50)
b.Initialize("")
p.AddNode(b, 150,110,100,50)
MainForm.RootPane.AddNode(p,10,10,200,200)
End Sub