Мигание окна приложения
Функция FlashWindow API мигает окно только один раз.
Для постоянного мигания окна, добавьте компонент TTimer на форму и используйте следующий код в обработчик события OnTimer:
procedure TForm1.Timer1Timer(Sender: TObject) ;
begin
FlashWindow (Handle, True) ;
end;
Комментарии