Dim l As B4XListTemplate
l.Initialize
l.Options = Array("a", "b", "c")
l.CustomListView1.DefaultTextBackgroundColor = 0xFFDDDDDD
l.CustomListView1.DefaultTextColor = xui.Color_Black
l.CustomListView1.AsView.Color = 0xFFDDDDDD
dialog.BackgroundColor = 0xFFDDDDDD
dialog.ButtonsColor = 0xFF8F8F8F
dialog.ShowTemplate(l, "Yes", "No", "Cancel")