hint中的字符串为什么不显示出来?????

Question

我在image2的onmousemove事件中加入语句:  image2.hint:='ok';
并且把image2的showhint属性设置为true; image2是放在image1中的,
所以我把image1的showhint属性也设置为true.
但运行后当我鼠标移到image2中时hint中的字符串为什么不显示出来,why???

Answer 1

1,showhint确实为true了吗？
2,image2是在image1之上吗？

Answer 2

是的!
现在已经有显示了,但是比较迟钝,hint的显示几率只有百份之六,七十;可能是因为我的image2是用一个时钟来控制它的显示与隐藏的缘故吧!

Answer 3

快速显示'HINT'的办法：procedure TForm1.Image2MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
    Label1.Left := Image2.Left + x + 15;
    Label1.Top := Image2.Top + y + 20;
    Label1.Visible := True;
end;procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
    Label1.Visible := False;
end;procedure TForm1.FormCreate(Sender: TObject);
begin
   Label1.Visible := False;
end;