Fórum Monitorar tempo de uso de um PC #350710

Ao iniciar o programa coloque um timer para funcionar, ao terminar a aplicação faça a diferença de tempo e salve em um arquivo, somando ao tempo lá existente. Faça este salvamento a cada 5 min. para evitar uma desligada por falta de energia ou outro motivo qualquer que não seja o desligamento normal do computador.

Para monitorar o tempo de uso do Windows (tempo em que o PC está ligado) faça o seguinte:

1 - Declare a variável:
var
SystemUpTime: Extended;

2 - Utilize a função para verificar o tempo de uso:
function GetSystemUpTime: Extended;
begin
try
SystemUpTime:= GetTickCount/1000;
except
SystemUpTime:= 0;
end;
result:= SystemUpTime;
end;

3 - Forma de utilização:
SystemUpTime:= GetSystemUpTime;
showmessage( [b:2b6171fca7]formatseconds[/b:2b6171fca7](SystemUpTime,true,false,false) );

Se te servir desta forma me avise que posto aqui a função [b:2b6171fca7]formatseconds[/b:2b6171fca7] (são mais de [u:2b6171fca7]100[/u:2b6171fca7] linhas) que é para formatar o resultado em dias, horas, minutos, segundos, etc.