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

SynEdit: refactor painting (Disable clipping on GTK2, due to GTK2 bug.)

Browse Source 
git-svn-id: trunk@38622 -
This commit is contained in:
martin 2012-09-12 11:06:34 +00:00
parent 1db4cf5fe6
commit 231d80c777
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
components/synedit/lazsyntextarea.pp
View File

@ -1644,11 +1644,12 @@ var
end; end;
end; end;
{$IFnDEF LCLGTK2}
if (ATokenInfo.PhysicalStart <> ATokenInfo.PhysicalPaintStart) or if (ATokenInfo.PhysicalStart <> ATokenInfo.PhysicalPaintStart) or
(ATokenInfo.PhysicalEnd <> ATokenInfo.PhysicalPaintEnd) (ATokenInfo.PhysicalEnd <> ATokenInfo.PhysicalPaintEnd)
then then
TxtFlags := TxtFlags + ETO_CLIPPED; TxtFlags := TxtFlags + ETO_CLIPPED;
{$ENDIF}
tok := rcToken; tok := rcToken;
if rcToken.Right > nRightEdge + 1 then if rcToken.Right > nRightEdge + 1 then