Evento en TToolBar

[ecfisa]

Hola.

Si no entendí mal la situación, podes usar el evento OnClick del TToolButton en cuestión:

Código PHP:

// Abrir el PopupMenu asociado en posición:
void __fastcall TForm1::ToolBtnDropDownClick(TObject *Sender)
{
  TToolButton *TB = static_cast<TToolButton*>(Sender);

  PopupMenu1->Popup(TB->ClientOrigin.x, TB->ClientOrigin.y + TB->Height);
} 


Saludos