А ты проще пример не мог найти

Посмотри код компонента, который предложили (чем не пример для обучения), и посмотри там код добавления пунктв меню. Не все коды можно с VCL переложить с минимальными усилиями