Məsləhətlər

TPageControl Delphi İdarəetmə sekmelerini necə gizlətmək olar

TPageControl Delphi İdarəetmə sekmelerini necə gizlətmək olar

TPageControl Delphi idarəsi birdən çox səhifəlik bir informasiya qutusu etmək üçün istifadə olunan bir sıra səhifəni göstərir. Hər bir səhifə - bir tab vərəqi - öz nəzarətlərinə sahibdir. İstifadəçi nəzarətin yuxarısında görünən səhifənin sekmesini tıklayaraq səhifəni seçir (görünən hala gətirir).

PageControl tablarını gizlətmək

Səhifələr dəsti (dialoqlar) vasitəsilə bir istifadəçini irəli və geriyə keçirmək üçün göründüyü Next və Əvvəlki düymələri olduğu bir sehrbaz kimi istifadəçi interfeysi yaratmağınız lazımdırsa, PageControl sekmeleri gizləyin və beləliklə müəyyən bir səhifəni vasitələrlə seçməyə icazə verməyin istifadəçi siçanının.

Hiyləsi təyin etməkdədir TabVisible səhifə nəzarətinin vərəqlərinin hər biri üçün yalana qarşı xüsusiyyət (TTabSheet obyekti).

Səhifəni ya da istifadə edərək aktivləşdirin ActivePage ya da ActivePageIndex PageControl xüsusiyyətləri olacaq deyil qaldırmaq OnChangeOn dəyişdirmə hadisələr.

Proqramı aktiv bir səhifəni qurmaq üçün SelectNextPage metodundan istifadə edin:

// Səhifə idarəetmə tablarını gizlət
var
səhifə: tam;
başlamaq
səhifə üçün: = 0 PageControl1.PageCount - 1 etmək
başlamaq
SəhifəControl1.Pagespage.TabVisible: = saxta;
son;
// ilk nişanı seçin
SəhifəControl1.ActivePageIndex: = 0;
(*
Və ya birbaşa aktiv səhifəni qurun
SəhifəControl1.ActivePage: = TabSheet1;
Qeyd: yuxarıda göstərilənlər bunları qaldırmaz
OnChanging və OnChange hadisələri
*)
son;
prosedur TForm1.PageControl1 dəyişdirmə (
Göndərən: TObject;
var AllowChange: Boolean);
başlamaq
// son səhifədə əgər dəyişiklik yoxdur
AllowChange: = SəhifəControl1.ActivePageIndex <-1 + SəhifəControl1.PageCount;
son;
// "Əvvəlki" Tabprocedure TForm1-ni seçin. Göndərən: Səhifə Göndərmə
başlamaq
SəhifəControl1.SelectNextPage (saxta, yalan);
son;
// "Next" seçin Tabprocedure TForm1.NextPageButtonClick (Göndərən: TObject);
başlamaq
SəhifəControl1.SelectNextPage (əsl, saxta);
son;

Bu texnikadan istifadə formanı ləkələyəcək, daha sürətlənmiş bir interfeysə səbəb olacaq, lakin hər sekmədə nəzarətin tənzimlənməsi istifadəçini nişanlar arasında tez-tez hərəkət etməyə məcbur etməməsini təmin edəcəkdir.