i am using this snippest code from @Erel
but the panel color return wrong color
B4X:
Dim cd As ColorDialog
Dim sf As Object = cd.ShowAsync("Choose Color", "Yes", "Cancel", "No", Null, False)
Wait For (sf) Dialog_Result(Result As Int)
If Result = DialogResponse.POSITIVE Then
panel1.Color = cd.RGB
End If
but the panel color return wrong color