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

plotfunction: Fix vertical alignment of y axis caption (issue #26312)

Browse Source 
git-svn-id: trunk@56310 -
This commit is contained in:
wp 2017-11-06 10:28:12 +00:00
parent 688f52440c
commit f42a3fc3a5
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/plotfunction/plotpanel.pp
View File

@ -923,8 +923,8 @@ begin
CW:=ACanvas.TextWidth(L);
Case AVAxis.Caption.Alignment of
taLeftJustify : CY:=OY;
taRightJustify : CY:=EY-CW;
taCenter : CY:=(EY+OY-CW) div 2;
taRightJustify : CY:=EY+CW;
taCenter : CY:=(EY+OY+CW) div 2;
end;
TextOut(ACanvas.Handle, 4, CY, PChar(L), Length(L));
if OldFont <> 0 then