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

TAChart: Add 3-parameter-"Unused"

Browse Source 
git-svn-id: trunk@54014 -
This commit is contained in:
wp 2017-01-27 22:44:51 +00:00
parent a84ac921d2
commit 5884ef95c3
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
components/tachart/tachartutils.pas
View File

@ -348,6 +348,7 @@ function StrToFloatDefSep(const AStr: String): Double;
// Call this to silence 'parameter is unused' hint // Call this to silence 'parameter is unused' hint
procedure Unused(const A1); procedure Unused(const A1);
procedure Unused(const A1, A2); procedure Unused(const A1, A2);
procedure Unused(const A1, A2, A3);
procedure UpdateMinMax(AValue: Double; var AMin, AMax: Double); overload; procedure UpdateMinMax(AValue: Double; var AMin, AMax: Double); overload;
procedure UpdateMinMax(AValue: Integer; var AMin, AMax: Integer); overload; procedure UpdateMinMax(AValue: Integer; var AMin, AMax: Integer); overload;
@ -532,6 +533,10 @@ end;
procedure Unused(const A1, A2); procedure Unused(const A1, A2);
begin begin
end; end;
procedure Unused(const A1, A2, A3);
begin
end;
{$POP} {$POP}
procedure UpdateMinMax(AValue: Double; var AMin, AMax: Double); procedure UpdateMinMax(AValue: Double; var AMin, AMax: Double);