Android Question Hide Display Screen Behind MsgboxAsync

[Mahares]

Using a SignatureTemplate I populate 2 edittext views with random numbers and the user fills in the math answer in the 3rd edittext. After he confirms the answer, he gets the congratulatory message with MsgboxAsync and a new set of random values fill in the edittext views again to start all over.
I would like not to show the next set of numbers until he clicks ok, in other words hide the display behind the message box.
Thank you

 

[LucaMs]

Stupid answer? Create a panel over the other views and set its visibility as your need.

 

[Mahares]

I added a panel, but no matter where I placed it in the code with a change in its visibility, it did not seem to hide the edittext boxes behind the message. So here is what I did:
After this below line:

MsgboxAsync($"${num(0)} + ${num(1)} = ${num(2)} ${TAB} ${TAB} is the correct addition answer"$, csCongrat)

I added this code:

Wait For MsgBox_Result (Res As Int)
                If Res= XUI.DialogResponse_Positive Then

which succeeded in hiding the edittext views that were showing behind the Msgbox, but when the edittext views reappeared after clicking 'Ok', I could not get the focus or the keyboard to show on the 3rd edittext box, unless I clicked on the 3rd edittext box to input the result, despite inserting this

B4Xedt.RequestFocus
    IME.ShowKeyboard(B4Xedt)

:

 

[Erel]

Use B4XDialog.Show and set the OverlayColor to an opaque color:

dialog.OverlayColor = xui.Color_Black

 

[Mahares]

ialog.OverlayColor = xui.Color_Black

Where do you place the above line in the code and have it hide the dialog screen behind the message box. I tried just about everywhere there is a hole in the code, but no effect at all. Here is part of the code:

Dim rs As ResumableSub = Dialog.ShowTemplate(SignatureTemplate, Chr(0xF00C),"", Chr(0xF12D))   'Chr(0xF12D) is eraser
'    Dialog.OverlayColor=XUI.Color_Black
    Dialog.GetButton(XUI.DialogResponse_Positive).TextColor = XUI. Color_Green
    Dialog.GetButton(XUI.DialogResponse_Cancel).TextColor = XUI.Color_Red
    Draw   'sub to create random numbers
    Wait For (rs) Complete (Result As Int)
    If Result = XUI.DialogResponse_Positive Then
        Dim num(3) As Int
        num(0)=B4Xlbl(0).text :num(1)=B4Xlbl(1).text :num(2)=B4Xedt.text    
        If num(0)+num(1)=num(2) Then
'            Dialog.OverlayColor=XUI.Color_Black
            MsgboxAsync($"${num(0)} + ${num(1)} = ${num(2)} ${TAB} ${TAB} is the correct addition answer"$, "Congratulations")
'            Wait For MsgBox_Result (Res As Int)
'                If Res= XUI.DialogResponse_Positive Then
'                Dialog.OverlayColor=XUI.Color_Black
                btnSignature_Click
'                End If
        Else
            level=0
            MsgboxAsync($"${num(0)} + ${num(1)} = ${num(2)} ${TAB} ${TAB} is the wrong addition answer"$, "Sorry")
            Return
        End If

 

[Erel]

Before you call Dialog.Show.

 

[Mahares]

Before you call Dialog.Show.

I already did, just about everywhere in the code. I am not getting anywhere. I can reproduce it in a tiny project

 

[Erel]

I can reproduce it in a tiny project

Upload it please.

 

[Mahares]

Upload it please.

Here is a small project that reproduce the problem:

 

[Erel]

I've meant that you can use B4XDialog instead of MsgboxAsync:

Dialog.OverlayColor = 0xFF109419
Dialog.Title = "Sorry"
Dialog.Show($"${num(0)} + ${num(1)} = ${num(2)} ${TAB} ${TAB} is the wrong addition answer"$, "Ok", "", "")

 

[Mahares]

I've meant that you can use B4XDialog instead of MsgboxAsync:

Still not kosher.
When the line below Dialog(Show is btnSignature_Click, it does not stop for the Ok to be clicked and the message does not show. But, when the line below DIalog(Show is Return, it does stop and the message is displayed. Please see code below:

Wait For (rs) Complete (Result As Int)
    If Result = XUI.DialogResponse_Positive Then
        Dim num(3) As Int
        num(0)=B4Xlbl(0).text :num(1)=B4Xlbl(1).text :num(2)=B4Xedt.text  
        If num(0)+num(1)=num(2) Then
            Dialog.OverlayColor = 0xFF109419
            Dialog.Title = "Congratulations"
            Dialog.Show($"${num(0)} + ${num(1)} = ${num(2)} ${TAB} ${TAB} is the correct addition answer"$, "Ok", "", "")
            'Here it does not wait for the Ok button to be clicked. Does not display the message. BAD
            btnSignature_Click
        Else
            level=0
            Dialog.OverlayColor = XUI.Color_Red
            Dialog.Title = "Sorry"
            Dialog.Show($"${num(0)} + ${num(1)} = ${num(2)} ${TAB} ${TAB} is the wrong addition answer"$, "Ok", "", "")
            'Here it waits for the Ok button to be clicked. GOOD
            Return
        End If
    End If

 

[Erel]

Wait For (Dialog.Show($"${num(0)} + ${num(1)} = ${num(2)} ${TAB} ${TAB} is the correct addition answer"$, "Ok", "", "")) Complete (unused As Int)