Spanish mensaje de espera

[Gustavo]

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]

Si, y además es muy fácil:

Usa ProgressDialogShow

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]

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)]

algo asi debe ser suficiente

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]

buenisimo me parecia que podia ser algo asi, pero como veran todavia sigo intentando. gracias por la ayuda