Mega Code Archive

 

Categories / Delphi / VCL

 

Add chevron to TToolbar if some buttons are invisible (part 2)

Title: add chevron to TToolbar if some buttons are invisible (part 2) Hello, today I want to continue the previous tip and describe how to open the popup menu with invisible buttons of toolbar by click in chevron button. Drop the TPopupMenu component on your form and change the Name property to PopupMenuForToolbar. Now we must add the handler for WM_NOTIFY message in declaration of our form: type