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

TAChart: UpdateMinMax should update both min and max if necessary.

Browse Source 
git-svn-id: trunk@20088 -
This commit is contained in:
ask 2009-05-21 07:16:09 +00:00
parent 7526bb803e
commit d18b9a4254
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/tachart/tachartutils.pas
View File

@ -305,8 +305,8 @@ end;
procedure UpdateMinMax(AValue: Double; var AMin, AMax: Double);
begin
if AValue < AMin then
AMin := AValue
else if AValue > AMax then
AMin := AValue;
if AValue > AMax then
AMax := AValue;
end;