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
For x = 1 To 40
For y = 1 To 20
Dim b As Button
b.Initialize("")
MainForm.RootPane.AddNode(b, (x - 1) * 40, (y - 1) * 30, 40, 30)
b.Text = x & "," & y
Next
Next
End Sub