Rozwijanie PopupMenu za pomocą kodu

Aby po kliknięciu przycisku Button1 rozwinąć menu podręczne (PopupMenu) należy wywołać jego metodę Popup() podając współrzędne, gdzie pojawi się rozwinięte menu:

Unit1.cpp

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   PopupMenu1->Popup(100, 100);
}