Spanish Cómo esperar a que una pagina de B4XPages finalice? [Solucionado]

carlos7000 · Sep 2, 2023

Hola a todos

Deseo hacer algo así:

B4X:

Private Sub ButtonQrOrigen_Click
    B4XPages.ShowPage("Qr Code Reader")
    Dim Resultado As String = QRC_Reader.Resultado
    Log($"Resultado ${Resultado}"$)
End Sub

Como uds ya saben, el código anterior se ejecuta sin esperar a que finalice la pagina "Qr Code Reader".

Sé que podría emplear Wait, pero no sé como emplearlo en este caso.

Si alguien me puede ayudar, por favor.

carlos7000 · Sep 2, 2023

He intentado con el siguiente código, pero no funciona

B4X:

Private Sub ButtonQrOrigen_Click
    B4XPages.ShowPage("Qr Code Reader")
    Wait For B4xPage_Disappear
        
    Dim Resultado As String = QRC_Reader.Resultado
    Log($"Resultado ${Resultado}"$)
End Sub

angel_ · Sep 2, 2023

Prueba algo así:

B4X:

Private Sub Button1_Click
    Dim rs As ResumableSub = GetQRC_Reader
    
    Wait For (rs) Complete (Result As String)
    Dim Resultado As String = Result
End Sub

Private Sub GetQRC_Reader As ResumableSub
    Return QRC_Reader.Resultado
End Sub

[B4X] Resumable subs that return values (ResumableSub)

Remember that that a call to Sleep or Wait For in a resumable sub causes the code flow to return to the parent. Example: Sub Button1_Click Sum(1, 2) Log("after sum") End Sub Sub Sum(a As Int, b As Int) Sleep(100) 'this will cause the code flow to return to the parent Log(a + b) End Sub...

www.b4x.com

carlos7000 · Sep 3, 2023

angel_ said:
Prueba algo así:

B4X:

Private Sub Button1_Click Dim rs As ResumableSub = GetQRC_Reader Wait For (rs) Complete (Result As String) Dim Resultado As String = Result End Sub Private Sub GetQRC_Reader As ResumableSub Return QRC_Reader.Resultado End Sub

[B4X] Resumable subs that return values (ResumableSub)

Remember that that a call to Sleep or Wait For in a resumable sub causes the code flow to return to the parent. Example: Sub Button1_Click Sum(1, 2) Log("after sum") End Sub Sub Sum(a As Int, b As Int) Sleep(100) 'this will cause the code flow to return to the parent Log(a + b) End Sub...

www.b4x.com

Hola.

Lo intente de esta forma

No funcionó.

De esta forma:

Tampoco funcionó. Voy a intentar en el foro Ingles.

Muchas gracias

angel_ · Sep 3, 2023

carlos7000 said:
Hola.

Lo intente de esta forma

View attachment 145513
No funcionó.

De esta forma:

View attachment 145512

Tampoco funcionó. Voy a intentar en el foro Ingles.

Muchas gracias

En estos dos casos no estás declarando correctamente el tipo de salida que espera la función que debe ser ResumableSub

carlos7000 · Sep 7, 2023

Hola.

Les comento que en el foro ingles he encontrado lo que estaba buscando.

Este es el link a la respuesta: https://www.b4x.com/android/forum/t...-page-to-disappear-solved.150008/#post-950779

carlos7000 · Sep 7, 2023

angel_ said:
En estos dos casos no estás declarando correctamente el tipo de salida que espera la función que debe ser ResumableSub

Hola Angel.

Supongo que algo hice mal, porque aun así, no me funcionó.

También probe un código que si logre hacer funcionar.

Muchísimas gracias por su ayuda.

Spanish Cómo esperar a que una pagina de B4XPages finalice? [Solucionado]

carlos7000

Well-Known Member

carlos7000

Well-Known Member

angel_

Well-Known Member

[B4X] Resumable subs that return values (ResumableSub)

carlos7000

Well-Known Member

[B4X] Resumable subs that return values (ResumableSub)

angel_

Well-Known Member

carlos7000

Well-Known Member

carlos7000

Well-Known Member

Similar Threads

Spanish Cómo esperar a que una pagina de B4XPages finalice? [Solucionado]

Well-Known Member

Well-Known Member

Well-Known Member

Well-Known Member

Well-Known Member

Well-Known Member

Well-Known Member

Similar Threads

Privacy & Transparency

Privacy & Transparency