mouse的位置如何确定? 在某个控件的OnClick()事件中弹出 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 form中的onmousemove里的x,y就是当前的鼠标位置 可以在想捕捉mouse的控件的mouseup事件中写:if Button=mbleft then PopupMenu1.Popup(form1.clienttoscreen(point(x,y)).x,form1.clienttoscreen(point(x,y)).y); var Pt:TPoint;------------------GetCursorPos(PT);//获取当前点坐标(Pt.x,Pt.y) 对不起,没写完!var Pt:TPoint;------------------GetCursorPos(PT);//获取当前点坐标(Pt.x,Pt.y) PopupMenu1.Popup(Pt.x,Pt.y); renzhm(戴尔飞) ,你的方法正确,谢谢,也谢谢万王之王等专家的帮助,我给你们加分。 dbgridEh过滤换数据集 再弱问,fastreport中,怎么获得dateset的字段名? 我想动态设置titlebond上memo的字段名 奇怪问题,"Sort"字段不能添加记录? 为什么XP下无法进行DLL 的断点调试? 急需delphi5支持50個用戶的license key: 取随机数 100分的问题,请教我 怎样不让我的程序在系统对话框中看到 关于修改数据库中的记录。 怎样把数字变成大写数字???(给20大分)!!! 在delphi中这么截取‘ab cd‘中的空格为一个阿斯科码。 有关远程访问数据库的问题(送分)
if Button=mbleft then
PopupMenu1.Popup(form1.clienttoscreen(point(x,y)).x,form1.clienttoscreen(point(x,y)).y);
Pt:TPoint;
------------------
GetCursorPos(PT);//获取当前点坐标(Pt.x,Pt.y)
var
Pt:TPoint;
------------------
GetCursorPos(PT);//获取当前点坐标(Pt.x,Pt.y)
PopupMenu1.Popup(Pt.x,Pt.y);