paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-18 19:39:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

IdeIntf: Fix coordinates for TTIPropertyGrid.OnPropertyHint. Issue #34689, patch from Zhengji.

Browse Source 
git-svn-id: trunk@60708 -
This commit is contained in:
juha 2019-03-17 09:16:48 +00:00
parent 209dc36684
commit fcdd4db4dc
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/ideintf/objectinspector.pp
View File

@ -3579,7 +3579,7 @@ begin
// Get hint // Get hint
OkToShow := True; OkToShow := True;
HintType := GetHintTypeAt(Index, Position.X); HintType := GetHintTypeAt(Index, ClientPosition.X);
if (HintType = pehName) and Assigned(OnPropertyHint) then if (HintType = pehName) and Assigned(OnPropertyHint) then
OkToShow := OnPropertyHint(Self, PointedRow, AHint) OkToShow := OnPropertyHint(Self, PointedRow, AHint)
else else