fix, call tip win position when fun has overloads

This commit is contained in:
Basile Burg 2015-03-15 01:28:09 +01:00
parent 92925489ca
commit 0cafc5b37a
1 changed files with 2 additions and 1 deletions

View File

@ -609,7 +609,8 @@ begin
begin
fCallTipWin.FontSize := Font.Size;
fCallTipWin.HintRect := fCallTipWin.CalcHintRect(0, str, nil);
fCallTipWin.OffsetHintRect(ClientToScreen(point(CaretXPix, CaretYPix)), - (Font.Size * 2 + 5));
fCallTipWin.OffsetHintRect(ClientToScreen(point(CaretXPix, CaretYPix)),
- 5 - fCallTipWin.HintRect.Bottom - fCallTipWin.HintRect.Top);
fCallTipWin.ActivateHint(str);
end;
end else fCallTipWin.Hide;