procedure TForm1.Button1Click(Sender: TObject);
var frm:TForm2;
begin
// 1) 2. bir form oluşturup uses kısmına bu formun unit'ini ekliyoruz.
// 2) Ana forma bir adet page control nesnesi ve bir buton ekliyoruz.
// 3) Pagecontrol nesnesinede bir adet tabsheet (yeni bir sayfa) oluşturuyoruz
 
//Butona ekleyecek olduğumuz kod
frm:=TForm2.Create(self);
frm.Parent:=TabSheet1;
frm.Show;
end;