A flashing form

Problem/Question/Abstract:

Change the appearance of a forms caption bar from active to inactive (flashing)

Answer:

Flashes the window only once; for repeated flashing you should use e.g. a TTimer

uses
  Windows;

procedure TForm1.Button1Click(Sender: TObject);
begin
  { Handle identifies the window to be flashed }
  FlashWindow(Handle, true);
end;