Form - Fazer barra piscar

Top  Previous  Next

15 - Como fazer a barra de título ficar intermitente (piscante)?

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;