FoxPro/Visual FoxPro - progressbar

Hola a todos !!, disculpen la molestia pero quisiera saber como se utiliza el progressbar. Lo que pasa quiero utilizarlo en uno de mis formularios y no se como funciona les agredeceria que me axiliaran

Hola

Es muy simple:
a. Debes darle un valor inicial a la propiedad "Value" (generalmente, cero)
b. Debes aumentar el valor de la propiedad Value
c. Cuida que Value nunca sea ni menor que cero ni mayor que cien

Ejemplo: Para procesar todos los registros de la tabla CLIENTES

ThisForm.ProgressBar.Value = 0

USE CLIENTES
TotalRegistros = RecCount()

I = 1
DO WHILE .NOT. EOF()
ThisForm.ProgressBar.Value = I * 100 / TotalRegistros
I = I + 1
*--- Tu proceso aquí
skip
ENDDO

Con este ejemplo verás la barra de progreso moviéndose (si tu tabla tiene pocos registros, la barra de progreso se moverá muy rápido así que puedes escribir WAIT WINDOW después del comando SKIP para observar lo que ocurre)

NOTA: Si quieres mostrar también un porcentaje, agrega una etiqueta llamada "porcentaje" y, antes de la asignación I = I + 1, escribe:
ThisForm.Porcentaje.Caption = Str(I * 100 / TotalRegistros, 6, 2) + "%"

Suerte

Walter.

Excelente, me funciona correctamente, muchas gracias por su valioso aporte

Muchas gracias , te la agradesco de verdad