SubChart events
Posted: Wed May 20, 2009 6:27 am
Is it possible to catch subcharts events for example the OnZoom event?
Best regards,
Nikemann
Best regards,
Nikemann
Yes, but you should assign them at runtime. This code works fine here:
Code: Select all
procedure TForm1.FormCreate(Sender: TObject);
begin
ChartTool1.Charts[0].Chart.Title.Visible := true;
ChartTool1.Charts[0].Chart.OnZoom := Chart1Zoom;
ChartTool1.Charts[0].Chart.OnUndoZoom := Chart1UnZoom;
end;
procedure TForm1.Chart1Zoom(Sender: TObject);
begin
ChartTool1.Charts[0].Chart.Title.Text.Text := 'Zoomed';
end;
procedure TForm1.Chart1UnZoom(Sender: TObject);
begin
ChartTool1.Charts[0].Chart.Title.Text.Text := 'UnZoomed';
end;