Só dando um pitaco, fazer um if com uma comparação: T = true é chover no molhado.
toda comparação é internamente um calculo lógico, então, se a variável já contem um valor lógico pode-se simplificar: t:=true ; if T then begin .... end else begin ... end ; ----- Original Message ----- From: humberto sales To: delphi-br@yahoogrupos.com.br Sent: Thursday, February 28, 2008 10:49 PM Subject: Re: [delphi-br] Icone da barra de tarefas piscar p/ chamar a atenção coloca um timer no form var t : boolean; procedure TForm1.Timer1Timer(Sender: TObject); begin t := not(t); if t = true then FlashWindow(Application.Handle ,true) ///pisca a barra de tarefas do windows else FlashWindow(Handle ,true); //pisca a barra de titulo do form end; (leia livro Delphi Apis e Sockets (hugo S Novaes e Fabio Camara ) tem muita coisa a respeito) espero q tenha ajudado... t+ fabio giro <[EMAIL PROTECTED]> escreveu: Veja se isto serve: FlashWindow(Handle, True); FlashWindow(Application.Handle, True); coloca em um timer eh pronto... Espero ter ajudado. Valdir Sola <[EMAIL PROTECTED]> escreveu: Boa tarde a todos, Alguém conhece algum componente que faça o icone da janela na barra de tarefas piscar p/ chamar a atenção, tipo messenger? Obrigado --------------------------------- Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] --------------------------------- Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
