B4J Library [B4X] An Inline Map Key Chooser - A Small Helper Class

Private Sub B4XPage_Created (Root1 As B4XView)
    Root = Root1
    Root.LoadLayout("MainPage")
    MKC.Initialize(Root)
End Sub

Private Sub Button1_Click
    'Private MKC As MapKeyChooser in Globals
    Dim anyMap As Map = CreateMap()
    For i = 1 To 10
        anyMap.Put("Key" & i, "ABCDEFGHIJKLMNOP".CharAT(i -1))
    Next
    MKC.ChooseKey(anyMap, "anyMap")
   
    'After choice, find on Log: anyMap.Get("Key5")
End Sub