关于FMX 单击出来右键菜单,并显示在当前下面
Posted pykill
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了关于FMX 单击出来右键菜单,并显示在当前下面相关的知识,希望对你有一定的参考价值。
关于FMX 单击出来右键菜单,并显示在当前下面
procedure TForm1.btn6MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Single);
var
LP: TPointF;
begin
LP := btn6.LocalToAbsolute(TPointF.Create(btn6.Width / 2, btn6.Height / 2 ));
LP := btn6.Scene.LocalToScreen(lP);
btn6.PopupMenu.PopupComponent := btn6;
btn6.PopupMenu.Popup(Round(LP.X), Round(LP.Y));
end;
以上是关于关于FMX 单击出来右键菜单,并显示在当前下面的主要内容,如果未能解决你的问题,请参考以下文章