• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 244
  • Last Modified:

speeding up the hint display

In a listbox, I wanted to code a hint on mousemove.

I coded this :

procedure TFMagicWinner.ListBox2MouseMove(Sender: TObject;
  Shift: TShiftState; X, Y: Integer);
var
  p : TPoint;
  itemnum : integer;
begin
  p.x := x;
  p.y := y;
  itemnum := listbox2.Itematpos(p, true);
  if itemnum > -1 then
  begin
      ListBox2.showhint := false;
      listbox2oldpos := itemnum;
      ListBox2.hint := ListBox2.Items[ItemNum];
      ListBox2.showhint := true;
  end;
end;
it works fine when I enter on the control, but when I move the mouse over it, the hint is not redisplayed.
The problem does not come from the mousemove event which is triggered correctly but from the fact that I cannot display the hint when I want.

I am sure somebody has a simple solution for that

0
mhervais
Asked:
mhervais
1 Solution
 
msediCommented:
Hello,

maybe you can try Application.CancelHint. That's the one to reset the HintDisplay counter.
For the time to hide and show the hint, try Application.HintHidePause and Application.HintShortPause maybe these two properties are useful for you.

Good luck,
Martin
0
 
mhervaisAuthor Commented:
Great answer Thank you very much
0

Featured Post

Vote for the Most Valuable Expert

It’s time to recognize experts that go above and beyond with helpful solutions and engagement on site. Choose from the top experts in the Hall of Fame or on the right rail of your favorite topic page. Look for the blue “Nominate” button on their profile to vote.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now