frnd Postado Maio 6, 2008 Denunciar Share Postado Maio 6, 2008 Seguinte,eu utilizo o TTimer para que a janela apareça durante 5 segundos, mas o que está estranho é assim...tem hora que ele abre e fecha em menos de 5 segundos.... durante 1 2 segundos..... e depois funciona normal.porque isso? Poderá ser o cursor ou algo semelhante?[]s Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Denis Courcy Postado Maio 7, 2008 Denunciar Share Postado Maio 7, 2008 Seguinte,eu utilizo o TTimer para que a janela apareça durante 5 segundos, mas o que está estranho é assim...tem hora que ele abre e fecha em menos de 5 segundos.... durante 1 2 segundos..... e depois funciona normal.porque isso? Poderá ser o cursor ou algo semelhante?[]sOi, 'frnd' !1) observe os Conceitos abaixo:TTimer usa um interval de 1000 milisegundos para cada segundo. Assim, 5 segundos = 5000.TTimer usa um desvio da interrupção 8 (clock - relógio da máquina) liberada pelo Windows para controle de tempo Não há falha nesta transação.2) Verifique se estes fatores estão sendo seguidosVocê está usando o TTimer na janela chamada? (Deveria)O tempo começa a contar quando a janela é ativada e desativado quando a janela é fechada ou colocada em segundo plano?(Timer.Enabled)Você está usando o controle de laço para a contagem do tempo dentro do evento ONTIMER? Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 frnd Postado Maio 7, 2008 Autor Denunciar Share Postado Maio 7, 2008 Bom,aqui eu coloquei o TTimer como ENABLED = TRUE e com o INTERVAL = 1 na janela que ficará durante 5 s aparecendo, e com o seguinte código:procedure TForm5.Timer1Timer(Sender: TObject); begin if (Timer1.Interval = 1) then Timer1.Interval := 7000; Form5.Close; end; Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Vivendo&Aprendendo Postado Maio 9, 2008 Denunciar Share Postado Maio 9, 2008 Olá frnd!Se você deseja que seu form seja fechado em 5 segundos, então faça da seguinte forma:1 - observe o que o colega Denis Courcy falou a respeito do Timer estar no form que será fechado;2 - o laço que ele disse ficará da seguinte forma:Var I : Integer; begin Timer1.Enabled := True; For i := 1 to Timer1.Interval do If i = 5000 Then Form1.Close; end;Esse código deve estar no evento OnTimer do Timer. 5000 é o tempo de milisegundos que o form ficará aberto, ou seja, 5 sefundos, esse tempo deve ser declarado na propriedade Interval do componente.Espero ter ajudado.Abraços Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Jhonas Postado Maio 9, 2008 Denunciar Share Postado Maio 9, 2008 Coloque na propriedade interval do timer 5000e no evento OnTimer procedure TForm5.Timer1Timer(Sender: TObject);begin Form5.Close;end;abraço Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
frnd
Seguinte,
eu utilizo o TTimer para que a janela apareça durante 5 segundos, mas o que está estranho é assim...
tem hora que ele abre e fecha em menos de 5 segundos.... durante 1 2 segundos..... e depois funciona normal.
porque isso? Poderá ser o cursor ou algo semelhante?
[]s
Link para o comentário
Compartilhar em outros sites
4 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.