paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-28 22:20:25 +02:00
Code Issues Packages Projects Releases Wiki Activity

SynEdit, fixed calc pixel coordinates. Right value was used, but from wrong function

Browse Source 
git-svn-id: trunk@17835 -
This commit is contained in:
martin 2008-12-14 23:57:05 +00:00
parent 993bd7b87d
commit 590ebab989
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/synedit/synedit.pp
View File

@ -1262,7 +1262,7 @@ begin
Result:=RowCol;
Result.X := (Result.X - 1) * fCharWidth + fTextOffset;
{$IFDEF SYN_LAZARUS}
Result.Y := RowToScreenRow(CaretY) * fTextHeight + 1;
Result.Y := RowToScreenRow(RowCol.Y) * fTextHeight + 1;
{$ELSE}
Result.Y := (Result.Y - fTopLine) * fTextHeight + 1;
{$ENDIF}