Clarion - progresBar

   
Vista:

progresBar

Publicado por Marcos (97 intervenciones) el 15/05/2008 02:52:56
Hola mi problema es que tengo un procedimiento hecho con codigo y cuando lo ejecuto desde algun boton necesitaria que aparecienra una barra de progreso mientras se termina de ejecutar todo el procedimiento alguna idea de como hacerlo?
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
información
Otras secciones de LWP con contenido de Clarion
- Código fuente de Clarion
- Cursos de Clarion
información
Códigos de Clarion
- Llamar al form para insertar desde el menu

RE:progresBar

Publicado por ricardo (181 intervenciones) el 15/05/2008 14:21:37
Muy Facil

En el Window, pon el "progress bar" del tamaño q mejor se te ajuste a la ventana, yo ademas lo dejo oculto (Hide).
La variable declarala y usa una de tipo real, ejemplo:

Resto Real !Lo que llevo procesado
Total Real !Total de lo que voy a procesar
Progreso Real !Valor del progress bar

!Si usas fechas
D_Fec Long !Fecha inicio
A_Fec Long !Fecha fin

Code
Resto = 0 ;Total = Records(Fichero)
Progreso = 0 ;Unhide(?Progreso) !Por defecto dejo la barra oculta

Loop
Resto+=1
Progreso = Resto * 100 / Total
Display !Si no pones este display no se ve la barra caminar

!tu codigo o proceso
End

!Si usas fechas
Total = A_Fec - D_Fec
Progreso = 0 ;Unhide(?Progreso) !Por defecto dejo la barra oculta

Loop
Progreso = (Pre:FechaDelRegistroEnCurso - D_Fec) / ((A_Fec - D_Fec) / 100)
Display !Si no pones este display no se ve la barra caminar

!Tu codigo o proceso
End

y eso es todo amigos .....
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar