Как прикрутить ScrollBar к Chart?

TrackBar->Visible = false;
while ( Position( какие_то_ваши_изменяющиеся_привязки) > Определенного_значения ) {
  TrackBar->Visible = true;
  Chart->Width = Chart->Width+10;
{

const int MaxVisableX = 2600; //Маленькое значение относительно вашего графика
 
//Гденибуть один раз в начале, или вообще в настройках самого компонента
void __fastcall TForm1::FormCreate(TObject *Sender)
{
 Chart1->BottomAxis->Automatic = false;
 Chart1->BottomAxis->Maximum = MaxVisableX; 
 ScrollBar1->Max = Series1->MaxXValue();
}
 
//в обработчике OnScroll компонента TScrollBar
void __fastcall TForm1::ScrollBar1Scroll(TObject *Sender, TScrollCode ScrollCode,
          int &ScrollPos)
{
 switch (ScrollCode) {
  case scTrack:
   //без следующей конструкции, при перемотке например назад говорит что то вроде MaxValue mast be >= MinValue
   if (Chart1->BottomAxis->Minimum < ScrollPos) {
    Chart1->BottomAxis->Maximum = ScrollPos + MaxVisableX;
    Chart1->BottomAxis->Minimum = ScrollPos;
   }else{
    Chart1->BottomAxis->Minimum = ScrollPos;
    Chart1->BottomAxis->Maximum = ScrollPos + MaxVisableX;
   }
  break;
  case scEndScroll:
   Chart1->SetFocus();
  break;
  default : return;
 }
}