a814123
814123
2017-06-24 16:39
采纳率: 95.4%
浏览 1.1k
已采纳

delphi toolbar 单击按钮出现菜单,不是右键菜单?

delphi toolbar 单击按钮出现菜单,不是右键菜单?
实现效果,单击toolbar上的按钮,在按钮下方会出现一个菜单,类似右键菜单。
在按钮的右边有个小三角,点击小三角可以出现,点击按钮不行。
如何实现。

  • 点赞
  • 写回答
  • 关注问题
  • 收藏
  • 邀请回答

2条回答 默认 最新

  • devmiao
    devmiao 2017-06-24 16:46
    已采纳
    点赞 评论
  • qq_41535847
    懒惰的青蛙 2018-11-05 08:35

    在按钮点击事件增加如下代码:
    procedure TfrmSetToolBar.BitBtnClick(Sender: TObject);
    var
    lppoint: Tpoint;
    begin
    GetCursorPos(lppoint);
    PopupMenu1.Popup(lppoint.x, lppoint.y);
    end;

    点赞 评论

相关推荐