• Курсы Академии Кодебай, стартующие в мае - июне, от команды The Codeby

    1. Цифровая криминалистика и реагирование на инциденты
    2. ОС Linux (DFIR) Старт: 16 мая
    3. Анализ фишинговых атак Старт: 16 мая Устройства для тестирования на проникновение Старт: 16 мая

    Скидки до 10%

    Полный список ближайших курсов ...

Кнопка программы на панели задач

  • Автор темы xprizrak
  • Дата начала
X

xprizrak

В программе при определенных событиях начинает мигать кнопка программы на панели задач.
Для этого используется функция FlashWindow(Application.Handle, True);

При наступлении иного события кнопка должна перестать мигать. Мигать перестает. Но остаться то в подсвеченном состоянии, то в исходном. Зависит как понимаю от момента наступления события.
Как можно добиться что бы после остановки всегда возвращалась к исходному состоянию.

(Такое реализовано в qip, если окно сообщений свернуто, а сообщение пришло, кнопка начинает мигать, как только окно раскрываться, кнопка на панели задач возвращаться в исходное состояние.)
 
B

BurcevD

Точно не хнаю, но попробуйте FlashWindow(Application.Handle, False);
 
X

xprizrak

Спасибо, это уже пробывал, не работает.
 
B

BurcevD

Вот нашел
Пpоцедуpа FlashWindow

Синтаксис:



function FlashWindow(Wnd: HWnd; Invert: Bool): Bool;




Описание: Делает окно или пиктогpамму мигающими. Активное состояние откpытого окна инвеpтиpуется.
Wnd: Идентификатоp окна или оpгана упpавления.
Invert: Не нуль, если мигание, 0 - для возвpата к исходному состоянию (для пиктогpамм игноpиpуется).
Возвращаемое значение: Не нуль, если окно до вызова было активным; 0 - в пpотивном случае.
 
X

xprizrak

Если ставлю 0, то устанавливаться подсвеченным и все.
 
P

Poseidon

Как ты останавливаешь мигание? Вот тогда, когда мигание должно быть остановлено, делай еще
Application.Minimize;
Application.Restore;
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!