Sub Button1_Click
Dim i As Int
For i=1 To 105
If i Mod 2=0 Then
TableView1.SetColumns(Array As String("111","222"))
TableView1.SetColumnWidth(0,100)
TableView1.SetColumnWidth(1,100)
Else
TableView1.SetColumns(Array As String("RRR","MMM"))
TableView1.SetColumnWidth(0,200)
TableView1.SetColumnWidth(1,200)
End If
TableView1.Items.Clear
Dim lbl101 As Label
lbl101.Initialize("")
lbl101.Text="abc"
Dim lbl102 As Label
lbl102.Initialize("")
lbl102.Text="xyz"
TableView1.Items.Add(Array As Object(lbl101,lbl102))
Sleep(100)
Log(i)
Next
End Sub