//单击左键弹起菜单 97
void __fastcall TForm1::Button1MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift,
int X, int Y)
{
POINT pt;
::GetCursorPos(&pt);
PopupMenu1->Popup(pt.x, pt.y);
}
//单击左键弹起菜单 97
void __fastcall TForm1::Button1MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift,
int X, int Y)
{
POINT pt;
::GetCursorPos(&pt);
PopupMenu1->Popup(pt.x, pt.y);
}
转载于:https://www.cnblogs.com/xe2011/archive/2012/06/03/c667d69f3bb3310cbeb1fb43e199a03d.html