TabSheet

[Taribus]

Prueba a poner este evento en button del Tabshett,

procedure TForm1.Button1Click(Sender: TObject);
begin
PAgecontrol1.activePAge:=Tabsheet2;
end;