You've already forked lazarus-ccr
* Correctly position the header hint when bidimode is rtl
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1051 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
@ -6243,7 +6243,7 @@ begin
|
||||
end
|
||||
else
|
||||
begin
|
||||
if Tree.HintMode = hmTooltip then
|
||||
if (Tree.HintMode = hmTooltip) and (Node <> nil) then
|
||||
begin
|
||||
P := Tree.ClientToScreen(Point(Min(Tree.ClientWidth, HintInfo^.CursorRect.Right), 0));
|
||||
Dec(P.X, Result.Right);
|
||||
|
Reference in New Issue
Block a user