Voici un exemple simple :
.....
Copiez le code comme suit :
commencer
//Bloquez d'abord toutes les balises
pour i := 0 à PageControl.PageCount - 1 faire
PageControl.Pages[i].TabVisible := False;//Masquer
//Ouvre la page à onglet à afficher en premier, Tab_Page1:TTabSheet;
PageControl.ActivePage := Tab_Page1; //C'est la page pour contrôler le saut
fin;