TAChart: Fix typo: InitBuitlinTools -> InitBuiltinTools

git-svn-id: trunk@37759 -
This commit is contained in:
ask 2012-06-24 10:34:11 +00:00
parent bfc74c2a43
commit 71e80a4383

View File

@ -483,7 +483,7 @@ uses
GraphMath, InterfaceBase, Math, SysUtils,
TACustomSeries, TADrawerCanvas, TAEnumerators, TAGeometry, TAMath;
function InitBuitlinTools(AChart: TChart): TBasicChartToolset;
function InitBuiltinTools(AChart: TChart): TBasicChartToolset;
var
ts: TChartToolset;
begin
@ -1605,7 +1605,7 @@ end;
initialization
ToolsClassRegistry := TStringList.Create;
OnInitBuiltinTools := @InitBuitlinTools;
OnInitBuiltinTools := @InitBuiltinTools;
RegisterChartToolClass(TZoomDragTool, 'Zoom by drag');
RegisterChartToolClass(TZoomClickTool, 'Zoom by click');
RegisterChartToolClass(TZoomMouseWheelTool, 'Zoom by mouse wheel');