Delphi. Страничные раскладки. Создание их и использование

Сегодня научимся работать с компонентом - Page Control.

Откройте Delphi, создайте форму, и киньте на форму PageControl (ищите в Tool Palette):

Немного исследовав объект, можно заметить, что можно создавать и удалять вкладки, еще перед запуском программы, но так ведь не интересно, верно?

Давайте создадим кнопку, которая будет создавать вкладки прямо во время работы программы. Киньте на форму любую кнопку (например Button 1, ищете в ToolPalette). И перейдите в процедуру, которая активизируется при нажатии кнопки.
В var допишите
ts:TTabSheet;
Если нет Var добавьте. Затем в саму процедуру допишите:
ts:= TTabSheet.Create(Self);
ts.Caption:='Новая вкладка';
ts.PageControl:=PageControl1;
ts.Visible:=true;

Первая строчка значит создание самой вкладки, вторая задаёт название, третья указывает, в каком компоненте вкладка будет жить, а последняя указывает на видимость новой вкладки. На самом деле непонятно зачем нужна невидимая вкладка, но кто знает, какая идея может родиться в головах разработчиков…
Теперь можно маленько усложнить. Добавьте на наш компонент что-нибудь, например label.

Но теперь новая вкладка будет создаваться пустой… Дело в том что Ваш компонент (label) тоже нужно создать, вместе с новой вкладкой. Для этого дописываем такие строки:
label1:=Tlabel.Create(Self);
label1.Parent:=ts;
label1.caption:='Это программа’;

Вот теперь вроде нормально, скажете Вы, но вот странность, координаты (0,0) а на первой вкладке по центру были…

Это потому что каждый параметр нужно прописывать вручную. За высоту и ширину отвечаю параметры
label1.left:=«ваше число»;
label1.top:=«ваше число»;

И если вы хотите развернуть вашу вкладку на весь экран, то рекомендую воспользоваться параметром Align (в Object Inspector) и выставить там параметр alClient.