B4X:
Sub test
Dim kj As kjlib
Dim iv As ImageView
Dim kjc As BitmapConfig
kjc.init
kjc.CacheTime=10000
kjc.DiskCacheSize=20480
kj.initkjbitmap("kj",kjc)
kj.displayimg(iv,"http://www.123.com/123.jpg",0,0)
kj.saveImage(File.DirRootExternal&"/aa.jpg","http://www.123.com/123.jpg")
End Sub
Sub kj_onloading(count As Long,current As Long)
End Sub
Sub kj_onSuccess(bmp As Bitmap)
End Sub
Sub kj_onFailure(err As String)
End Sub
B4X:
Sub gridviewdemo
Private gv As GridView
Private adp As adapter
gv.init("gv",99999,50%x,50%x,2)
adp=gv.Adapter
gv.Paddingbottom=5dip
gv.Paddingleft=5dip
gv.Paddingright=5dip
gv.Paddingtop=5dip
Dim m As Map
Dim datalist As List
datalist.Initialize'you should add data at here
For i=0 To datalist.Size-1
m=datalist.Get(i)
Dim item As GridItem
item.Id=m.Get("id")
item.Name=m.Get("name")
item.Url=m.Get("url1")
item.Url2=m.Get("url2")
Log(item)
If item<>Null Then
adp.items.Add(item)
End If
Next
adp.NotifyDataSetChanged
End Sub
Sub gv_OnItemClick(v As ItemView,pos As Int,id As Long)
Log("gv_pos:"&pos)
End Sub
chg log:
1.4
update the kjframework core to 2.2.5 to support android 6.0
Attachments
Last edited: