paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-22 13:39:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

LCL-GTK3: Use double for font angle calculation, was rounded to whole degrees. Orientation is not rendered yet. Issue #35697, patch from Alexey Tor.

Browse Source 
git-svn-id: trunk@61347 -
This commit is contained in:
juha 2019-06-09 19:54:49 +00:00
parent 89a7a7414e
commit 9c792cd818
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lcl/interfaces/gtk3/gtk3winapi.inc
View File

@ -788,16 +788,16 @@ var
var TextLeft,TextTop: Integer);
var
OffsX, OffsY: integer;
Angle: Integer;
Angle: Double;
Size: TSize;
R: TRect;
begin
R := SavedRect;
OffsX := R.Right - R.Left;
OffsY := R.Bottom - R.Top;
Size.cX := OffsX;
Size.cx := OffsX;
Size.cy := OffsY;
Angle := AFontAngle div 10;
Angle := AFontAngle / 10;
if Angle < 0 then
Angle := 360 + Angle;