Case "job1"
Dim parser As JSONParser
parser.Initialize(job1.GetString)
Dim LstData As List
LstData.Initialize
LstData = parser.NextArray
items.Add(LstData)
adapter.Initialize(items.Size).ToListView(gallery)
Sub gallery_getview (rowView As Panel,Position As Int)
Dim p55 As Panel
p55.Initialize("p55")
p55.LoadLayout("temp")
rowView.AddView(p55,2%x,0,98%X,72%Y)
For Each MapData As Map In items.Get(Position)
Label1.Text= MapData.Get("title")
Label1.TextColor=Colors.Black
Label2.Text= MapData.Get("fi")
Label2.TextColor=Colors.Black
Label3.Text=MapData.Get("fi2")
Label4.Text= MapData.Get("fi3")
Label5.Text= MapData.Get("f4")
Next
مشکل از کجا است