Arquivo

Posts Tagged ‘tempo’

Como controlar o tempo de inatividade do usuário

 

user_idle_time

 

Suponha que você precisa do aplicativo para bloquear automaticamente a entrada / edição de dados, a menos que o usuário tenha sido ativa por um longo tempo. Para fazer isso, é hora de aprender.

Usuários para rastrear tempo pode usar a API GetLastInputInfo .

GetLastInputInfo retorna o tempo (em milissegundos) do último evento (a partir do momento em que a atividade foi detectada através do teclado ou do mouse).

O seguinte é um exemplo simples de uso. Função SecondsIdle retorna o número de segundos, sem a atividade do usuário (função é chamada no evento OnTimer do componente TTimer ).

 

function SecondsIdle: DWord;
var
liInfo: TLastInputInfo;
begin
liInfo.cbSize := SizeOf(TLastInputInfo) ;
GetLastInputInfo(liInfo) ;
Result := (GetTickCount – liInfo.dwTime) DIV 1000;
end;

procedure TForm1.Timer1Timer(Sender: TObject) ;
begin
Caption := Format(‘tempo ocioso :  %d segundos’, [SecondsIdle]) ;
end;

 

Como um resultado do programa no cabeçalho do formulário para exibir o tempo de inatividade, em segundos.

Anúncios
Categorias:Artigos, Delphi Tags:, ,
%d blogueiros gostam disto: