Dim retmap As Map
retmap.Initialize
retmap.Put("tag","mytag")
retmap.Put("itemID","0815")
retmap.Put("name","Test")
retmap.Put("line1","Line 1")
retmap.Put("line2","Line 2")
lv.AddTwoLines2(retmap.Get("line1"),retmap.Get("line2"), retmap)
End Sub
Sub lv_ItemClick (Position As Int, Value As Object)
Dim retmap As Map = Value
Log("Item at Pos "&Position&" Clicked...")
Log("ItemInfos:")
Log("tag = "&retmap.Get("tag"))
Log("itemID = "&retmap.Get("itemID"))
Log("name = "&retmap.Get("name"))
Log("line 1 = "&retmap.Get("line1"))
Log("line 2 = "&retmap.Get("line2"))
End Sub