鼠标在image控件上移动过程中,能够根据鼠标位置不同而显示相应的Hint信息啊?
我在image的onmousemove事件中如下写了代码:
img.showhint := true;
img.hint := inttostr(x) + ',' + inttostr(y);
但是实际实现的时候,确实只能显示一次hint信息,必须鼠标移动到其他控件上再移回image控件上时才能继续显示hint信息,这是怎么回事啊?
怎样才能达到我的目的呢?多谢
我在image的onmousemove事件中如下写了代码:
img.showhint := true;
img.hint := inttostr(x) + ',' + inttostr(y);
但是实际实现的时候,确实只能显示一次hint信息,必须鼠标移动到其他控件上再移回image控件上时才能继续显示hint信息,这是怎么回事啊?
怎样才能达到我的目的呢?多谢
解决方案 »
- 新手求教,在delphi中如何使用POS机的显示屏控制命令
- 关于DELPHI写的代理服务软件的一个小问题,程序路由
- EAccessviolation 错误 ()
- 如何知道现在webbrowse所显示的网页的http地址是什么?
- 一个财务接口程序遇到的问题,恳请高手指点!!!!!!!!!!!!!!!!!
- 100分讨论quickreport中QRDBRichText1 或 QRRichText1 实现换行问题。
- 散分啦(2)
- 关于Delphi中实现类似bitblt功能的问题。
- delphi5 到底有几个补丁啊?
- 哪位大哥帮忙把下面的C++代码翻译成Delphi的相应代码?
- 急!有关Indy UDP 的问题:为什么别人发给我的我收得到,我发给别人的别人收不到?
- 在c/s结构中如何递交用户修改?
GetCurrentPos得到不同位置鼠标信息
然后回调了
img.showhint := false;
img.showhint := true;
img.hint := inttostr(x) + ',' + inttostr(y);
然后用ShowWindows来显示出来,现实的时候,得到鼠标的位置即可.
var
p: TPoint; getcursorpos(p)