一个按钮和菜单的问题!

Question

单击一下BUTON.弹出一个下拉菜单来..这个怎么才能实现!

Answer 1

//--例子---
//--代碼放在Button的單擊事件；
var
  x,y: Integer;
begin
  x :=Mouse.CursorPos.X;
  y :=Mouse.CursorPos.Y;
  PopupMenu1.Popup(x,y);
end;

Answer 2

楼上的方法很对。需要先放一个弹出式菜单控件（popupmenu）
然后调用方法：  PopupMenu1.Popup(Mouse.CursorPos.X,Mouse.CursorPos.Y);如果是ToolBar上的ToolButton控件可以直接设置DropDownMenu属性即可。