兩個TChart組件的同步縮放

Question

我正在使用兩個TChart組件，並希望對它們進行同步縮放。我發現TChart的ZoomRect程序可以放大圖表上所需的矩形，但我還沒有找到任何方法從另一個圖表讀取此縮放矩形的座標。

這裏有一個額外的澄清一些僞代碼：

MainChart.OnZoom := HandleZooming; 

... 

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

我使用德爾福XE。

Answer 1

這應做到：

zoomRectangle := Rect(
    MainChart.Zoom.X0, 
    MainChart.Zoom.Y0, 
    MainChart.Zoom.X1, 
    MainChart.Zoom.Y1 
);