如何使控件的hint再次出现
delphi控件有个hint大家都知道,他在鼠标移动到上面的时候,会显示出来,但是有个问题,
鼠标在控件内部移动时,hint不会更新.
而我的Hint的内容,是根据在控件内部的坐标去提示的,比如 hint:=intToStr(x)+','+IntToStr(Y);
当时不会更新.除非鼠标移出控件范围,再次进来.
请问如何解决哦.
[解决办法]
你估计你这样写的
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);begin hint:=intToStr(x)+','+IntToStr(Y);end;
[解决办法]
Application.ShowHint()..
[解决办法]
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
hint:=intToStr(x)+','+IntToStr(Y);
ShowHint := False;
ShowHint := True;
end;