Мигающая иконка в Tab у TabControl

[Shouldercannon]

Как такое сделать одной или нескольким вкладкам, а затем вернуть исходную картинку.

[Shouldercannon]

Не получается адаптировать код для новой реализации работы с вкладками. Теперь из массива ничего не удаляется.
Проблема заключается в том, что после удаления вкладки, мигание иконки начинается на месте удалённой вкладки. Не получается побороть этот сдвиг

[kropotkina-alice]

on PageControlChange
...
if TabSheet[i]='Гость' then
"мигать" else
"не мигать"

[Shouldercannon]

Если бы всё так было просто. Вкладок с одинаковыми именами может быть очень много.

[kropotkina-alice]

Сообщение от Shouldercannon

Если бы всё так было просто. Вкладок с одинаковыми именами может быть очень много.

Но чем-то же они отличаются?

У вкладок, как и у любого компонента, есть спецсвойство - Tag.
Заведите себе глобальную переменную, инкрементируйте её при создании вкладки и передавайте её в Tag вкладки.
И тогда делайте вышеописанную проверку по Tag.
У вас же есть перечень вкладок (маленькое окошко на снимке)?
Пусть там будет ещё один, невидимый параметр - Tag вкладки.
А уж по какому условию вы будете выбирать какой вкладке мигать, а какой нет - это ваш выбор...

[Shouldercannon]

Получилось