Синхронизация TChart Опции

[Vardes]

Такой вопрос, имеется к примеру два компонента TChart на форме и в течение выполнения программы на обоих строится график (абциссы одинаковые, а вот ординаты отличаются, т.к. используются разные коэффициенты)...Можно как-нить всё это синхронизировать, т.е. к примеру прокручиваю один график, автоматом прокручивается другой, и то же самое увеличиваю в масштабе один, увеличивается др...Прошу совета, т.к. очень надо...

[klem4]

Если я правильно понял что ты хочешь сделать (сохранять текущий зум после смены страницы), то можно примерно так: Сохранять текущий зум а потом его восстанавливать

implementation
var
  zoom : Integer;

// ...
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
var
  i: integer;

begin

  if key = 27 then begin
    Chart1.ZoomPercent(110);
    inc(zoom);
  end;

  if key = 13 then begin
    Chart1.ZoomPercent(90);
    dec(zoom);
  end;

  if key = 39 then begin
       Chart1.UndoZoom;
       Chart1.NextPage;

       if zoom >= 0 then
        for i := 1 to zoom do
         Chart1.ZoomPercent(110)
       else
        for i := 1 downto zoom
         do Chart1.ZoomPercent(90);
  end;

  if key = 37 then begin
    Chart1.UndoZoom;
    Chart1.PreviousPage;
    if zoom >= 0 then
     for i := 1 to zoom
      do Chart1.ZoomPercent(110)
    else
     for i := 1 downto zoom
      do Chart1.ZoomPercent(90);
  end;
end;

не много лагает иногда надо разобираться.
Да и я тут поменял кнопки смены страниц на Esc и Enter (не помню что за коды у тебя там были)