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

* Fixed copy/paste error found by Pierre Panissod

Browse Source 
git-svn-id: trunk@22273 -
This commit is contained in:
michael 2009-10-24 07:51:19 +00:00
parent b8c2996e0d
commit 68ecf8856b
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

@ -903,8 +903,8 @@ begin
Until Y<=EY; Until Y<=EY;
if AVAxis.DrawZero and ((AVAxis.Origin<0) and ((AVAxis.Origin+AVAxis.Interval)>0)) then if AVAxis.DrawZero and ((AVAxis.Origin<0) and ((AVAxis.Origin+AVAxis.Interval)>0)) then
begin begin
Y:=OY-Round((OY-EY)*Abs(AHAxis.Origin)/AHAxis.Interval); Y:=OY-Round((OY-EY)*Abs(AVAxis.Origin)/AVAxis.Interval);
ACanvas.Pen.Color:=AHAxis.TickColor; ACanvas.Pen.Color:=AVAxis.TickColor;
ACanvas.Line(OX,Y,EX,Y); ACanvas.Line(OX,Y,EX,Y);
end; end;
L:=AVAxis.Caption.Title; L:=AVAxis.Caption.Title;