Spanish Pantalla negra al salir de la App

[jwgf]

Hola, gente linda, tengo una app sencilla que funciona bien y que tiene dos activity, si abro la app y salgo pulsando un botón que ejecuta

Sub BotonSalir_Click
    Activity.RemoveAllViews
    Activity.Finish
End Sub

sale perfectamente y muestra la pantalla del móvil, pero si llamo a la otra activity con el código

Activity.RemoveAllViews
CallSubDelayed(Configuracion,"BotonWiFi_Click")

y luego regreso a la primera activity (Main) y pulso en el botonSalir sale de la app con una pantalla negra, seguramente algo hago mal.... alguna idea ?

 

[Jhonn]

Porque borraste todos los views, el activity está en resume??
Cerrar un activity

 

[jwgf]

Hola Jhonn, borre los views probando para ver si era eso. Pero es igual si lo borro o no, con respecto a tu pregunta no se a que te refieres,.... tengo un activity en main y otro en en un modulo de activity, gracias por tu pronta respuesta, Jorge

 

[jwgf]

Jhonn , el caso que envías como ejemplo seria, si, cuando regreso de una activity a la activity (main), quisiera salir de la app, pero lo que yo quiero es que cuando regreso a la activity (main) cargar la activity y cuando pulse el botón de salir lo haga sin una pantalla negra

 

[edgar_ortiz]

NO hace falta borrar los "views"... la forma correcta de cerrar TODA la aplicación están en link que te proporcionó Jhonn

Close one Activity from another Activity

Is it possible to close one activity from another activity? I desperately need this.

www.b4x.com

Saludos

Edgar

 

[jwgf]

Hola Edgar, si vi el link que me envió Jhonn, pero no resuelve mi problema, pego código para ver si me puedo explicar mejor.

Sub Activity_Create(FirstTime As Boolean) 'esto es en Main'
        Activity.LoadLayout("pantallainicio")
End Sub   

Sub Activity_Resume
    If GlobalVar.ctrlActivity == True Then 'si estoy retornando desde otra activity
        GlobalVar.ctrlActivity = False
        'Activity.RemoveAllViews
        Activity.LoadLayout("pantallainicio")   
    End If
    ime.HideKeyboard
End Sub

Sub BotonAgregar_Click
       Activity.RemoveAllViews
        GlobalVar.ctrlActivity = True
        StartActivity(ListadoEventos)
End Sub

Sub BotonSalir_Click
    'Activity.RemoveAllViews
    Activity.Finish
End Sub

Y luego tengo un Activity Modulo (ListadoEventos) con este código

Sub Activity_Create(FirstTime As Boolean)
    'Esta activity usa dos layout pantallalista y pantallaingreso, ambas para el manejo y edición de los eventos
    Activity.LoadLayout("pantallalista")
    GlobalVar.ctrlActivity = False
End Sub

Sub Activity_Resume
    If GlobalVar.ctrlActivity == True Then
        GlobalVar.ctrlActivity = False
        Activity.LoadLayout("pantallalista")
    End If
End Sub

Sub BotonRegresar_Click
    GlobalVar.ctrlActivity = True
    Activity.RemoveAllViews
    StartActivity(Main)
End Sub

Seguramente lo estoy haciendo muy mal... pero si no coloco Activity.RemoveAllViews, cuando vuelvo a entrar me muestra la segunda activity y si lo agrego funciona "bien", pero sale de la app con una pantalla negra. Espero haberme explicado bien ahora, gracias

 

[edgar_ortiz]

El codigo deberia de quedar así:

Sub Activity_Create(FirstTime As Boolean) 'esto es en Main'
    Activity.LoadLayout("pantallainicio")
End Sub 

Sub Activity_Resume
    If GlobalVar.ctrlActivity == True Then 'si estoy retornando desde otra activity
        GlobalVar.ctrlActivity = False
    End If
    ime.HideKeyboard
End Sub

Sub BotonAgregar_Click
    GlobalVar.ctrlActivity = True
    StartActivity(ListadoEventos)
End Sub

Sub BotonSalir_Click
    Activity.Finish
End Sub

Y segunda actividad:

Sub Activity_Create(FirstTime As Boolean)
    'Esta activity usa dos layout pantallalista y pantallaingreso, ambas para el manejo y edición de los eventos
    Activity.LoadLayout("pantallalista")
    GlobalVar.ctrlActivity = False
End Sub

Sub Activity_Resume
    If GlobalVar.ctrlActivity == True Then
        GlobalVar.ctrlActivity = False
        Activity.LoadLayout("pantallalista")
    End If
End Sub

Sub BotonRegresar_Click
    GlobalVar.ctrlActivity = True
    ' Activity.RemoveAllViews
    Activity.Finish
End Sub

 

[jwgf]

Mil gracias Edgar, no había entendido que cuando se ejecuta Activity.Finish dentro de un modulo de activity, se regresa a main, que burro !!. SOLUCIONADO.