iOS Question create add to map sub

cloner7801

Active Member
Licensed User
Longtime User
Hi
I use this for add record to map but it doesn't work
https://www.b4x.com/android/forum/threads/addtomap.43937/#post-267500



I want to create a sub to add record to map

I use :

B4X:
Sub AddToMap(ValueList As List) 

  Dim KeyList As List = Array("name","type","ip")

   
    For i = 0 To KeyList.Size - 1
       main.allkeys.Put(KeyList.Get(i), ValueList.Get(i))
    Next
   
End Sub


But when I use this code

Dim js As JSONGenerator
js.Initialize(Main.allkeys)
Log(js.ToString)


its just show me last record! I think when I use put its delete previous record
 
Top