Private Sub pg_Resize(Width As Int, Height As Int)
TableView1.Initialize("TableView1", False)
pnSong.AddView(TableView1,0dip,0dip,100%x,100%y)
Dim img As Bitmap = LoadBitmap(File.DirAssets, "icon.png")
For i = 1 To 50
TableView1.AddSingleLine("Item #" & i)
Dim tc As TableCell = TableView1.AddTwoLines("First Line", "")
tc.Bitmap = img
tc.IndentationLevel =0
Dim ColoredTitle As AttributedString
ColoredTitle.Initialize("second line ", Font.CreateNew2("AK01",26), Colors.Black)
tc.DetailText = ColoredTitle
Next
End Sub