Ventana de Espera Con Barra de Progreso

International Español
1

Buenos das.
Estoy empezando a probar Xojo, y me gustara saber como puedo craer una ventana con una barra de progreso que se abra mientras hago un proceso en la base de datos.

Por ejemplo en un bucle:

for i As Integer = 1 to Registros

// Llamada a ventana de espera con parmetros i = ProgressBar.Value Registros=ProgressBar.Maximum

//Accin sobre base de datos mas o menos lenta
next

Alguien puede ayudarme?

2

No utilice un bucle simple. Eso sera congelar la aplicacin.
En su lugar, utilizar un temporizador que hace lo mismo, y empuja la barra de progreso.

Cuando abre la database hace

Ventana_Progresso.ProgressBar1.Maximum = db.records

Pone esto en el evento Action de un Multiple timer con Period = 20 a 40 :

If ProgressBar1.Value < db.records //db is the database then ProgressBar1.Value = db.pointer // currente position de lectura else self.close end if

Tambin, mira al ejemplo /Applications/Xojo 2016 Release 3/Example Projects/Desktop/Controls/ProgressBar.xojo_binary_project