Determinar componente principal

Question

Tenemos TToolbarButton (s) en una barra de herramientas, cada uno con su propio TPopupMenu asociado. Los menús emergentes son todos iguales, por lo que nos gustaría tener solo un menú para todos los botones de la barra de herramientas. El problema que tengo es determinar qué ToolbarButton invocó el menú emergente.

He intentado lo siguiente, pero sigo recibiendo una infracción de acceso.

...

with (Sender as TPopupMenu) do
  ShowMessage((GetParentComponent as TPopupMenu).Name);

...

¿Alguna idea de cómo obtener el elemento primario del menú emergente?

Gracias, Pieter.

Answer 1

Probar

  with (sender as  TPopupMenu)  do
      ShowMessage(PopupComponent.Name);

Eso debería darle el TToolButton que se presionó.