Написать визуальный компонент на Delphi

Нужен класс на основе TWinControl (обсуждаемо) который реализует своеобразное меню.

Внешний вид в приложенном файле.

Нужно иметь возможность "конструировать" это меню в инспекторе свойств.

Каждый элемент меню должен иметь как минимум события OnClick, OnGetText

Для всего компонента настраивается отображение для нормального, подсвеченного, нажатого и отключенного состояния пунктов.

Желательно:

использовать для отрисовки TDirect2DCanvas

отрисовка надписи с возможностями TJvHTLabel

Оставляя предложение, не жалейте слов, а портфолио подкрепит Ваши слова.