M MroBurk Member Licensed User Nov 22, 2021 #1 Hi, I need to copy only the selected item (as string) and paste it in label... How Can I Manage the item with only "true" valued ? Thanks !!! B4X: Dim m As Map = CreateMap("Item #1": False, "Item #2": False, "Item #3": False) InputMapAsync(m, "Select items", True) Wait For InputMap_Result
Hi, I need to copy only the selected item (as string) and paste it in label... How Can I Manage the item with only "true" valued ? Thanks !!! B4X: Dim m As Map = CreateMap("Item #1": False, "Item #2": False, "Item #3": False) InputMapAsync(m, "Select items", True) Wait For InputMap_Result
Erel B4X founder Staff member Licensed User Longtime User Nov 22, 2021 #2 I would have used B4XListTemplate + B4XDialog instead of InputMapAsync. Code: For Each key As String In m.Keys Dim Checked As Boolean = m.Get(Key) If Checked Then 'do something End If Next Upvote 0
I would have used B4XListTemplate + B4XDialog instead of InputMapAsync. Code: For Each key As String In m.Keys Dim Checked As Boolean = m.Get(Key) If Checked Then 'do something End If Next
M MroBurk Member Licensed User Nov 22, 2021 #4 Thank you Erel!! [CODE lang="b4x" title="to manage "Item" of InputMapAsync"]private sub Label1_Click Dim m As Map = CreateMap("Item #1": True, "Item #2": True, "Item #3": False) InputMapAsync(m, "Select items", True) Wait For InputMap_Result For Each Key As String In m.Keys Dim Checked As Object = m.Get(Key) If Checked Then Log(Key) Label1.Text = Key End If Next End Sub [/CODE] Upvote 0
Thank you Erel!! [CODE lang="b4x" title="to manage "Item" of InputMapAsync"]private sub Label1_Click Dim m As Map = CreateMap("Item #1": True, "Item #2": True, "Item #3": False) InputMapAsync(m, "Select items", True) Wait For InputMap_Result For Each Key As String In m.Keys Dim Checked As Object = m.Get(Key) If Checked Then Log(Key) Label1.Text = Key End If Next End Sub [/CODE]
