Como posso atribuir o evento OnClick de um ToolButton em tempo de execução?

Eu tenho um TToolBar criado em tempo de design sem nenhum ToolButtons. Minha idéia é criar ToolButtons em tempo de execução e colocá-los lá quando meus formulários são criados, apenas para mostrar ao usuário quais formulários são abertos sem a necessidade de abrir um menu "Windows" no menu principal.

Eu tenho uma unidade chamada NavigationUtils.pas que eu uso para armazenar os procedimentos / funções sobre navegação (como a criação dos botões quando meus formulários são criados).

A pergunta é: Como posso configurar o evento OnClick quando os ToolButtons são criados?

questionAnswers(1)

yourAnswerToTheQuestion