[Solved] TaChart unZoom on dbl-click only
lazarus / 55-TAChart

----------------------------------------------------------------------
Marq01 · 2025-01-01 11:27

Is it possible to change the Chart unZoom function from left mouse
click to a left-mouse double click?
The reason is that if you on accident left click you loose all the
zooming and panning.
I looked into the zoomdragtool but could not find a logic place to
intercept the mouse click.
Any hint is appreciated.

----------------------------------------------------------------------
wp · 2025-01-01 16:53

Add a TChartToolset component to the form, assign it to the Tools
property of the chart. This deactivates the built-in drag tool.Add a
TZoomDragTool to the Toolset. Check the ssLeft element of the Shift
property. In RestoreExtentOn uncheck the element zreClick so that the
dragtool no longer sees the single click to unzoomAdd a
TUserDefinedTool to the Toolset. Check the elements ssDouble and
ssLeft in its Shift property. Add the following code to the
OnAfterMouseDown event of the toolCode: Pascal
 [Select][+][-]window.onload = function(){var x1 =
document.getElementById("main_content_section"); if (x1) { var x =
document.getElementsByClassName("geshi");for (var i = 0; i procedure
TForm1.ChartToolset1UserDefinedTool1AfterMouseDown(ATool: TChartTool; 
APoint: TPoint);begin  Chart1.ZoomFull;end;

----------------------------------------------------------------------
Marq01 · 2025-01-02 14:12

Thanks WP.
Learned also how to use the Userdefined tool now.