TdxBarButton в "горячем виде"

Добрые вечер господа, покопавшись пол дня в исходниках девок уже кипят мозги, ибо написаны они для моего пока еще "детского разума" крутовато.
Суть задачи помигать раза три TdxBarButton'ом в риббонстатусбаре привлекая внимание юзера, да вот не получается этот самый "HotStatus" (или как там его, при ерзаньи мышем по кнопке, она подсвечивается) выловить дабы прицепить к таймеру.
Знатоки девок, подскажите пожалуйста как девку то разгорячить?

_IUnknown

Добрые вечер господа, покопавшись пол дня в исходниках девок уже кипят мозги, ибо написаны они для моего пока еще "детского разума" крутовато. Суть задачи помигать раза три TdxBarButton'ом в риббонстатусбаре привлекая внимание юзера, да вот не получается этот самый "HotStatus" (или как там его, при ерзаньи мышем по кнопке, она подсвечивается) выловить дабы прицепить к таймеру. Знатоки девок, подскажите пожалуйста как девку то разгорячить?

Ну если таймером, то, например, у айтема цвет поменяйте пару раз.

Цвет у айтема я попробовал поменять первым же делом, это не прокатывает

_IUnknown
Цвет у айтема я попробовал поменять первым же делом, это не прокатывает

Application.ProcessMessages ?

MMM_Corp
Application.ProcessMessages ?

Как это относится к вопросу ?

_IUnknown
Суть задачи помигать раза три TdxBarButton'ом в риббонстатусбаре привлекая внимание юзера

MMM_Corp
_IUnknown Цвет у айтема я попробовал поменять первым же делом, это не прокатывает Application.ProcessMessages ?

наверное автор забыл между миганиями :)

Причём здесь "забыл". Он вообще мигнуть не может. Да и вряд ли получится, поскольку в коде постоянно проверяется положение курсора (на кнопке он или нет)

Как правильно заметил DimaBr сейчас даже без таймера просто хотя бы подсветить как это делается при наведении грызуна и то не получается, public метода нет, думал сделать либо наследника либо хелпер, но не могу разобраться какой метод отвечает за подсветку.
Мне бы пинок в нужную сторону :)

_IUnknown
Мне бы пинок в нужную сторону :)

Да пожалуйста

procedure TCustomdxBarControl.DoBarMouseEnter(Shift: TShiftState; const APoint: TPoint; AItemControl: TdxBarItemControl);