Ir ao topo

Tecnobyte

Logomarca da Tecnobyte
Contato por WhatsApp

WhatsApp

(69) 3421-6756

Contato por Telefone

(69) 3421-6756

(69) 3421-6757

Enviar mensagem

Enviar

mensagem

Contato por Facebook

Facebook

Contato por Skype

Skype

Atendimento de segunda a sexta, das 08h00 às 19h00 (horário de Brasília).

Delphi - Formulários

Como fazer a barra de título do formulário ficar intermitente (piscando)?

Banner
Inclua na seção uses: Windows
{ Coloque um TTimer no Form desejado. Define a propriedade
  Interval do Timer para 1000 (1 segundo). Modifique
  o evento OnTimer do Timer conforme abaixo: }

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  FlashWindow(Handle, true);
  FlashWindow(Application.Handle, true);
end;

O conteúdo desta página pode ajudar alguém? Compartilhe!