F Fencer Unregistered / Unconfirmed GUEST, unregistred user! 2000-01-20 #2 那是Windows的功能，将你的窗口移得向下一点菜单也会向上弹出。将开始菜单 移到上面就会向下弹出没什么特别的。
A aerobull Unregistered / Unconfirmed GUEST, unregistred user! 2000-01-20 #3 我不会写这样的 程序,你如果用CoolMenu 控件那么 你所提的问题是 Very Easy!!! 如果自己写 ，我的想法： 1.在 Form 的右下角放 bitbtn, 2.放一个PopMenu 3.在Bitbtn 的 Click Events 中Pop 出PopMenu,不过要改变Menu 的字体， 大小,我做不出来.
我不会写这样的 程序,你如果用CoolMenu 控件那么 你所提的问题是 Very Easy!!! 如果自己写 ，我的想法： 1.在 Form 的右下角放 bitbtn, 2.放一个PopMenu 3.在Bitbtn 的 Click Events 中Pop 出PopMenu,不过要改变Menu 的字体， 大小,我做不出来.
W wjiachun Unregistered / Unconfirmed GUEST, unregistred user! 2000-01-20 #4 试试 form的OnClick事件: procedure TForm1.FormClick(Sender: TObject); var p:tpoint;//定位 begin GetCursorPos(P); popupmenu1.Popup(p.x,p.y); end;
试试 form的OnClick事件: procedure TForm1.FormClick(Sender: TObject); var p:tpoint;//定位 begin GetCursorPos(P); popupmenu1.Popup(p.x,p.y); end;
W wjiachun Unregistered / Unconfirmed GUEST, unregistred user! 2000-01-20 #5 或参考http://www.gislab.ecnu.edu.cn/delphibbs/DispQ.asp?LID=170418
O o*o Unregistered / Unconfirmed GUEST, unregistred user! 2000-01-20 #7 D4的TPopupMenu的Alignment没有BottomAlign，看看D5有没有。 在D4下，用TrackPopupMenu(hMenu,32,x,y,0,Handle,nil)可实现上弹。
H hsw Unregistered / Unconfirmed GUEST, unregistred user! 2000-01-20 #8 请用RXLIb的 RXpopmenu 构件 他能作出 Win98 “开始”式的弹出菜单（十分精美）。
