Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("1")
DateTime.DateFormat = "dd/MM/yyyy"
DateFm.Date = DateTime.DateParse("01/05/2018")
AddTable
End Sub
Sub AddTable
Table1.Initialize(Me,"Table1",4)
Table1.FontSize = 25
Table1.HeaderFontColor = Colors.Cyan
Table1.AddToActivity(Activity,0dip,250dip,480dip,700dip)
Table1.SetHeader(Array As String("Col1","Col2","Col3","Col4"))
For i = 0 To 5000
Table1.AddRow(Array As String("Row: " & i, "ccc", "ddd", "eee"))
Next
Table1.SetColumnsWidths(Array As Int(100dip, 100dip, 120dip, 100%x - 260dip))
End Sub