Add

// Главная форма
frm=new TForm();
frm.Caption="JS+ - метод компонента TStatusPanels Add";
frm.Width =525;
frm.Height=375;

// Строка состояния
stb=new TStatusBar(frm);
stb.SimplePanel=false;
for (i=w=0;i<3;i++) {
  stp=new TStatusPanel(stb);
  stp.Text=" Сегмент "+(i+1)+" ";
  if (i>0) {
    stp.Alignment=taCenter;
    w+=(stp.Width=stb.TextWidth(stp.Text)+10);
  }
}
stb.Panels[0].Width=stb.ClientWidth-w;

// Метка
lbl=new TLabel(frm);
lbl.Alignment=taCenter;
lbl.Caption="Пример строки состояния\nиз трех сегментов";
lbl.Left=(frm.ClientWidth-lbl.Width)/2;
lbl.Top =(stb.Top-lbl.Height)/2;

frm.ShowModal();