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

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

2个回答

fight_in_dl
战在春秋 回复a814123: 链接解决问题了吗?
大约 3 年之前 回复
a814123
814123 回复苏小喵: 我晕…
大约 3 年之前 回复

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

Csdn user default icon
上传中...
上传图片
插入图片
抄袭、复制答案,以达到刷声望分或其他目的的行为,在CSDN问答是严格禁止的,一经发现立刻封号。是时候展现真正的技术了!
立即提问
相关内容推荐