SetBounds

// Главная форма
frm=new TForm();
frm.Caption="JS+ - метод визуальных компонентов SetBounds";
frm.Width =450;
frm.Height=300;

// Строка состояния
stb=new TStatusBar(frm);
stb.SimpleText=" Границы панели установлены методом SetBounds";

// Панель
pnl=new TPanel(frm);
pnl.Caption="Панель";
pnl.BorderStyle=bsSingle;
pnl.SetBounds(10,10,frm.ClientWidth-20,stb.Top-20);

frm.ShowModal();