Monitorar tempo de uso de um PC
Preciso monitorar o tempo de uso de um PC e os aplicativos usados, alguem poderia me dar uma dica de como começar.
Um cliente cobra pelo tempo de uso e os aplicativos usados
Grato
Um cliente cobra pelo tempo de uso e os aplicativos usados
Grato
Orpolonio
Curtidas 0
Respostas
Edilcimar
18/12/2007
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.
GOSTEI 0
Asales
18/12/2007
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.
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.
GOSTEI 0