如何控制右键菜单的弹出位置？(50分)

G

gongminxia

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-18

• #1

我现在开发的应用系统中，应需要，在界面底部的状态条上放了一个按钮，现在想按钮的Click
事件激发右键菜单，由于按钮在界面底部，所以希望菜单能由下往上弹；另一种方法是，算出
动态生成的菜单的高度，把菜单的显示位置上提这个菜单的高度，这样也能解决菜单跑到
界面下面的问题。哪位高手能帮我解决吗？谢谢

 

Z

zhang w.

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-19

• #2

>算出动态生成的菜单的高度，把菜单的显示位置上提这个菜单的高度
我就是这样解决的，也想知道更简便的方法。

 

X

xiao_min

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-19

• #3

POPUPMENU不是会自己适应的么？
往下显示不下，就往上弹，往右显示不下，就往左弹，你那里不是么？

 

H

huizhang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-22

• #4

调用PopupMenu的Popup(X, Y:integer)方法 用X,Y来确定Popup位置
TPopupMenu.Popup可以自动检测Window的边界以便调整位置

 

L

ledo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-22

• #5

var
tmp:TPoint;
begin
tmp := ClientToScreen(Point(Button1.Left,Button1.top-Button1.height-hh));// hh为菜单的高度，可动态获取 //
PopupMenu1.Popup(tmp.X, tmp.Y);
end;

 

G

gongminxia

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-23

• #6

谢谢大家！