鼠标在image控件上移动过程中,能够根据鼠标位置不同而显示相应的Hint信息啊?
我在image的onmousemove事件中如下写了代码:
img.showhint := true;
img.hint := inttostr(x) + ',' + inttostr(y);
但是实际实现的时候,确实只能显示一次hint信息,必须鼠标移动到其他控件上再移回image控件上时才能继续显示hint信息,这是怎么回事啊?
怎样才能达到我的目的呢?多谢

解决方案 »

  1.   

    用api函数
    GetCurrentPos得到不同位置鼠标信息
    然后回调了
      

  2.   

    试试
    img.showhint := false;
    img.showhint := true;
    img.hint := inttostr(x) + ',' + inttostr(y);
      

  3.   

    1。拼图:将图片切成块,然后拼到一起,制作网页有这种做法;2。跌层全图一张,然后利用小图(大图的一部分),放在大图上,使用小图的HINT。  不用代码,简单吧。
      

  4.   

    Hint窗口,可以使用CreateWindows来创建,
    然后用ShowWindows来显示出来,现实的时候,得到鼠标的位置即可.
    var
      p: TPoint;  getcursorpos(p)