菜单按钮实现····

Question

请问那种在按钮旁边有个下拉键···点了后可以出现菜单选项的效果该如何实现·····

Answer 1

Raize的RzMenuButton, 其实也就是Button＋PopupMenu而已

Answer 2

图片 +   property PopupMenu;

Answer 3

标准toolbutton可以实现,其他按钮的可以自己合并一个,或者用第三方的

Answer 4

用TOOLBAR，在上面新建TOOLBUTTON，然后改他的属性，好像有个 dropDown的。

Answer 5

我是用的TOOLBUTTON做的···菜单可以出来··可是不能在TOOLBUTTON上加图片和文字啊···觉得自己可能做错了·····

Answer 6

怎样把做出的菜单的按钮设置成左键点击弹出菜单呢`````一般做的都是右键点击弹出菜单
`````应该在ONMOUSEDOWN事件里面添加怎样的代码

Answer 7

procedure TForm1.Button1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
var
  p: TPoint;
begin
  p.X := 0;
  p.Y := TButton(Sender).Height;
  p := TButton(Sender).ClientToScreen(p);
  PopupMenu1.Popup(p.X, p.Y);
end;