Вот простой пример:
.....
Скопируйте код кода следующим образом:
начинать
//Сначала блокируем все теги
для i:= 0 до PageControl.PageCount - 1 сделать
PageControl.Pages[i].TabVisible := False;//Скрыть
//Открываем вкладку, которая будет отображаться первой, Tab_Page1:TTabSheet;
PageControl.ActivePage := Tab_Page1 //Это страница для управления переходом;
конец;