Spanish mensaje de espera

Gustavo

Member
Licensed User
Longtime User
hola como estan quisiera poner un mensaje de espere procesando datos, pero que aparesca el circulito dando vuelta en el mensaje, y luego cerrarlo sin intervencion del usuario, hay algo asi?
gracias
 

cuellar

Member
Licensed User
Longtime User
Si, y además es muy fácil:

Usa ProgressDialogShow

B4X:
Sub Globals
    'These global variables will be redeclared each time the activity is created.
    'These variables can only be accessed from this module.
  
    Dim Tim As Timer
End Sub

Sub Activity_Create(FirstTime As Boolean)
    'Do not forget to load the layout file created with the visual designer. For example:
    Activity.LoadLayout("Layout1")
    Tim.Initialize("Tim",12000) ' Inicializa el Timer y establece un valor de 12 segundos.
    Tim.Enabled=True
    ProgressDialogShow("Mensaje")
  
  
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub Tim_Tick
    ProgressDialogHide
    Tim.Enabled=False
End Sub

Espero haberte ayudado.
Un saludo.
 

Gustavo

Member
Licensed User
Longtime User
gracias cuellar, ahora voy a probar, por que la idea es que tengo que buscar un dato en un archivo y queria que aparesca el progressdialog cuando empiezo la busqueda y se cierre cuendo termina. gracias por la info
 

DATASOFT (SOLUSOFT S A)

Member
Licensed User
Longtime User
algo asi debe ser suficiente
B4X:
ProgressDialogShow("Mensaje")
funcion
ProgressDialogHide

nota:algunas veces es muy rápido el proceso y el dialogo no se aprecia bien o no se aprecia, por eso cuellar puso un timer "pequeño".
 

Gustavo

Member
Licensed User
Longtime User
buenisimo me parecia que podia ser algo asi, pero como veran todavia sigo intentando. gracias por la ayuda
 
Cookies are required to use this site. You must accept them to continue using the site. Learn more…