全部奉献了大家帮忙

设一个timer，设定一个时间，
在onmousemove里关它,然后打开
timer1.enabled:=false;
timer1.enabled:=True;
开始计时，当到你设定的时间时在
把showhint设为真,显hint内容。

解决方案 »

  1.   

    把showhint:True写在timer的ontime事件中
      

  2.   

    兄弟可能没有明白我的意思啊我是想把所有字段的HINT都有显示啊
    只不过是MOUSE移动到某一个字段的附近的时候就显示相应的字段啊再来看看吧
      

  3.   

    在OnMouseMove里面判断坐标，把Hint设置为你需要的内容
      

  4.   

    gaoys1979(虫洞) (  ) 嘻嘻，俺喜欢，就是你的啦
      

  5.   

    var
      a: TGridCoord;
      begin
    dbgrid2.showhint:=false;
      a := DBGrid2.MouseCoord(X,Y);
      if a.y = 0 then
    dbgrid2.Hint :=DBGrid2.Columns[a.x].Title.Caption;试了这个怎么不行,总是说OUT OF INDEX