3

我正在使用两个 TChart 组件,并希望为它们进行同步缩放。我发现 TChart 具有 ZoomRect 程序,用于放大图表上所需的矩形,但我还没有找到任何方法从另一个图表中读取这个缩放矩形的坐标。

以下是一些伪代码,用于额外说明:

MainChart.OnZoom := HandleZooming;

...

procedure HandleZooming(Sender: TObject);
var
  zoomRectangle: TRect;
begin
  zoomRectangle := MainChart.?????;
  SecondaryChart.ZoomRect(zoomRectangle);
end;

我正在使用德尔福 XE。

4

1 回答 1

11

这应该这样做:

zoomRectangle := Rect(
  MainChart.Zoom.X0, 
  MainChart.Zoom.Y0, 
  MainChart.Zoom.X1,
  MainChart.Zoom.Y1
);
于 2011-03-03T10:27:43.927 回答