一个显示问题,大家帮忙解决一下,感激不尽! 我想在鼠标移动到具体某一点时,希望在鼠标的右下角显示相应的鼠标坐标,或其他地方(鼠标附近)只要能显示就行。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 duchx你好:给你一段代码、看是否满足你的要求 OnMouseMove事件const iOffSet = 10;begin with Canvas do begin FillRect(ClipRect); //清除 TextOut(X+iOffSet, Y+iOffSet, IntToStr(X) + ',' + IntToStr(Y));//输出位置文本 end;end; 真的非常感谢,比我想的简单多了,我以为要用到API函数,原来这么简单就可以作出来了,谢谢你了! COM组件注册报错... delphi 高手帮忙!帮我看看这个控件怎么用? 关于截获程序封包的问题 有没有判断目录为空的API?? 高分请教,关于DLL的动态加载和释放的问题 如何将Access中的数据表导成Excel格式? 天啊,delphi竟然出现这样的bug啊,连注释和空格都可以调试啊,我快晕了啊。。。。。。 请教这样的SQL语句怎么写? 谁能告诉我取字符子串的函数是什么? 请问在Delphi中怎样生成GUID 请问:运行时出现找不到文件System.pas,运行不了程序,不知该怎么办? 什么控件能自动换行打印
给你一段代码、看是否满足你的要求
OnMouseMove事件const
iOffSet = 10;
begin
with Canvas do
begin
FillRect(ClipRect); //清除
TextOut(X+iOffSet, Y+iOffSet, IntToStr(X) + ',' + IntToStr(Y));//输出位置文本
end;
end;