Ir para formulario principal apos nao ativar teclado

Question

Pessoal, preciso de uma dica de como fazer para,
eu estar em um formulario, mas n�o estou usando
ou seja n�o teclei nem usei o mouse. O programa
volta automaticamente para o formulario principal,
apos algum tempo especificado por mim.

Agradecido
joao

Vispo · Answer

Vc pode usar o componente Timer e definir o intervalo de repeti��o de acordo com o tempo que vc quer, e program�-lo para exibir o formul�rio principal....

Joao1313 · Answer

Bispo obrigado, deste jeito ja esta funcionando. As vezes
agente esta trabalhando no formulario ele se fecha,
porque ja deu o tempo pre-definido. O que eu preciso
� apos um certo tempo que ninguem estiver
trabalhando nele o mesmo se feche.

Agradecido
joao

Joaoshi · Answer

Colega, acredito que para resolver deva utilizar o componente ApplicationEvents.

- Colocar o componente ApplicationEvents (da additional)
- No evento [b:2248e6d531]onIdle[/b:2248e6d531] voc� inicia o timer para fechar o form.

Espero ter ajudado.

Joao1313 · Answer

JoaoSHI, fiz assim mas n�o atendeu.procedure TForm1.ApplicationEventsIdle(Sender: TObject; var Done: Boolean);begin   Timer1.Enabled:= true;end;procedure TForm1.Timer1Timer(Sender: TObject);begin  form1.Show;end;end.N�o importa se estou teclando ou n�o o form1 vaipara show.Agradecidojoao...

Joaoshi · Answer

Colegaprocedure TForm1.ApplicationEventsIdle(Sender: TObject; var Done: Boolean); begin // a aplica��o ficou ociosa inicia o timerTimer1.Enabled:= true; end; Voc� deve chamar FORM1  a partir do click de um button (por exemplo)procedure TForm1.Button1Click(Sender: TObject);begin  Form1.Show;end;// se teve algum movimento parar o timer1.No evento OnMessage do ApplicationEvents:  if (Msg.message = WM_KEYDOWN)     or     (Msg.message = WM_LBUTTONDOWN) or (Msg.message = WM_RBUTTONDOWN) or     (Msg.message = WM_SYSKEYDOWN) then      Timer1.Enabled := False;procedure TForm1.Timer1Timer(Sender: TObject); begin   form1.Close;end; Espero ter ajudado....

Joao1313 · Answer

JoaoShi, deu certo.Abra�os e obrigado a todosjoao...

F�rum Ir para formulario principal apos nao ativar teclado #336387