En delphi la mayoría de las WinApis estan definidas en la unit Windows, y el uso de estas es transparente como si fueran funciones escritas en object pascal, seguramente mas de una vez has usado una y no te has dado cuenta...
Aquí tienes un ejemplo de lo que pides:
Código:
procedure TForm1.Button1Click(Sender: TObject);
var
FWinfo: TFlashWInfo;
begin
FWinfo.cbSize := 20;
FWinfo.hwnd := Application.Handle;
FWinfo.dwflags := FLASHW_ALL;
FWinfo.ucount := 10;
FWinfo.dwtimeout := 0;
FlashWindowEx(FWinfo);
end;
Otra forma de hacerlo es con la winapi FlashWindow y un Timer
Saludos!