[TExpander] Как отловить событие OnExpand?

[Liberator]

Доброго времени суток.

 

Потребовалось выполнять некоторый код при открытии/закрытии содержимого компонента TExpander. Но события, увы, такого нет в комплекте. Я уж и через стили попробовал навесить событие на кнопку, но не получилось. Если кто-то уже решил этот вопрос для себя - просьба поделиться опытом.

[rareMax]

Присоединяюсь к вопросу

[Alexander]

анализировать высоту(Height) в событии OnResize

[kami]

Все придумано до нас    http://stackoverflow.com/questions/35105713/delphi-set-the-texpander-height/35109511#35109511 берем protected - поле FIsExpanded и анализируем его в методе DoExpandedChanged.

Хотите - добавьте свое событие, хотите - пользуйтесь так.

Изменено 24 февраля, 2016 пользователем kami

[x11]

Т.е . "слепили горбатого" по быстренькому без событий?

Кто проверит, в новых версиях Delphi, добавили события?

По идее нужно 2 события: схлопывание и разворачивание.

Изменено 25 декабря, 2017 пользователем x11

[x11]

В 24.02.2016 в 20:47, Alexander сказал:

анализировать высоту(Height) в событии OnResize

 

при старте формы это событие срабатывает ПЯТЬ раз

[x11]

В библиотеке OrangeUI есть TSkinFMXPopup с нужными готовыми событиями.

[krapotkin]

Я для себя отлично решил вопрос. Сделал просто панель и кнопку. 30 секунд работы