如何使菜单始终从上弹出?在线等待 本人做了一个点击按钮左键就弹出快捷菜单,现在是只能贴着按钮的下边下拉,如何能让它始终贴着按钮的上边弹出呢?郁闷呀 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var ap : TPoint ;begin ap := Point(speedbutton1.Left,SpeedButton1.Top-(PopupMenu1.Items.Count*18+4)); ap := ClientToScreen(aP) ; PopupMenu1.Popup(ap.X,ap.Y) ; 如何连接*.Dbf表 将结果写到文本文件中 知道感应卡的通讯协议 怎样利用DELPHI控件来读写感应卡上的数据啊 对我来说很难的一个问题,在线等 会Delphi 的朋友都可以进来 关于成长 Tstrings问题,你会我不会,你帮我我给分 奇怪的代码,为什么? 怎么控制打印纸被打印的范围?? 用data module 做二,三层问题??? MDAC2.7与MDAC2.5的冲突问题? 如何在一个事件中调用另外的一个事件? 问题没解决,再问:如何在delphi下如何将一简体字符串转换为繁体!高手帮忙!
ap : TPoint ;
begin
ap := Point(speedbutton1.Left,SpeedButton1.Top-(PopupMenu1.Items.Count*18+4));
ap := ClientToScreen(aP) ;
PopupMenu1.Popup(ap.X,ap.Y) ;