Sub list_onscroll (ParentEventName As String,FirstVisibleItem As Int,VisibleItemCount As Int,TotalItemCount As Int)
If ParentEventName=="gallery" Then
If FirstVisibleItem + VisibleItemCount >= TotalItemCount Then
offset=offset+5
showtabliq.Release
showtabliq.PostString("https://yourdomain.com/","ofset="&offset)
End If
End If
End Sub
Case "load"
Dim parser As JSONParser
parser.Initialize(showtabliq.GetString)
JsonArray = parser.NextArray
adapter.Initialize(JsonArray.Size).ToListView(gallery)
سوال
mohammad3250 206
سلام کسی بلده چطور به اریا لیمیت بده
Sub list_onscroll (ParentEventName As String,FirstVisibleItem As Int,VisibleItemCount As Int,TotalItemCount As Int) If ParentEventName=="gallery" Then If FirstVisibleItem + VisibleItemCount >= TotalItemCount Then offset=offset+5 showtabliq.Release showtabliq.PostString("https://yourdomain.com/","ofset="&offset) End If End If End Sub
Case "load" Dim parser As JSONParser parser.Initialize(showtabliq.GetString) JsonArray = parser.NextArray adapter.Initialize(JsonArray.Size).ToListView(gallery)
تو اکتویتی هم
load.Initialize("load",Me) load.PostString("https://yourdomain.com/","ofset="&offset) Activity.AddView(reffresh,0,16%y,100%x,85%Y) reffresh.SetAriaListView(gallery)
لینک ارسال
به اشتراک گذاری در سایت های دیگر
1 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.