Forms Delphi

Title: How to Flash the Title Bar
Timer1.Interval=n(Tip for n=1000"1second")
procedureTForm1.Timer1Timer(Sender:TObject);
begin
FlashWindow(Handle,true);
FlashWindow(Application.Handle,true);
end;