Synchronize of two ScrollBoxes

Posted in Components

One of the ways of synchronization in Delphi is the Timer component. Use this component so.

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  ScrollBox2.HorzScrollbar.Position:=ScrollBox1.HorzScrollbar.Position;
  ScrollBox2.VertScrollbar.Position:=ScrollBox1.VertScrollbar.Position;
end;