Como saber el tiempo de encendido de mi computadora con Vfp

Como saber el tiempo de encendido de mi computadora con Vfp, esta es una rutina que nos permitirá saber cuánto tiempo lleva nuestro computador encendido de manera automática. Esta pequeña rutina hecha en VFP nos permitirá saber el tiempo que nuestro computador lleva encendido. También hemos agregado el control timer para poder hacerlo un poco mas elegante y poder ver cuando cambian los minutos en sus intervalos de 60 segundos.
Mientras usamos Windows, el sistema operativo mantiene un gran número de registros, de actividad, algunos simplemente con fines de monitoreo y otros para ayudarnos a corregir posibles problemas que puedan ocurrir mientras utilizamos la PC. Gracias a estos registros, es posible obtener todo tipo de datos sobre nuestro ordenador, como el tiempo que ha estado encendido continuamente sin apagarse o reiniciarse, lo que resulta muy útil, por ejemplo, para medir la estabilidad de un PC y saber con seguridad que no se reinicia de forma inesperada.

Deberás colocar en el evento init de tu formulario las siguientes instrucciones:

PUBLIC lngHours,lngMinutes,lngCount

CLEAR

STORE 0 TO lngHours,lngMinutes,lngCount

Declare integer GetTickCount in "KERNEL32" () As Long

local lngCount, lngHours, lngMinutes As Long

lngCount = GetTickCount()

lngHours = ((lngCount / 1000) / 60) / 60

lngMinutes =((lngCount / 1000) / 60) % 60

thisform.text1.value=PADL(ALLTRIM(STR(lngHours,2)),2,"0")

thisform.text2.value=PADL(ALLTRIM(STR(lngMinutes,2)),2,"0")

En el control del Timer1 en el evento Timer enmarcado con el circulo rojo, debes colocar las siguientes instrucciones:

lngCount = GetTickCount()

lngHours = ((lngCount / 1000) / 60) / 60

lngMinutes = ((lngCount / 1000) / 60) % 60

thisform.text1.value=PADL(ALLTRIM(STR(lngHours,2)),2,"0")

thisform.text2.value=PADL(ALLTRIM(STR(lngMinutes,2)),2,"0")

Thisform.Refresh

Esto permitirá que cada ves que el minuto cambie podrás observar el cambio de los minutos en la pantalla  mediante un ciclo repetitivo , de esa forma podrás ver como cambian los minutos y las horas en la pantalla.

En la parte inferior tendrás te dejaré el link en donde podrás descargar el programa totalmente gratis.