นี่เป็นตัวอย่างง่ายๆ:
-
คัดลอกรหัสรหัสดังต่อไปนี้:
เริ่ม
//ขั้นแรกให้บล็อกแท็กทั้งหมด
สำหรับ i := 0 ถึง PageControl.PageCount - 1 ทำ
PageControl.Pages[i].TabVisible := False;//Hide
//เปิดหน้าแท็บที่จะแสดงก่อน Tab_Page1:TTabSheet;
PageControl.ActivePage := Tab_Page1; //นี่คือเพจสำหรับควบคุมการกระโดด
จบ;