Pagecontrol elrejtése lap fejléc

PageControl: rejteni a Könyvjelzők címsor

Ne mondd, hogy hogyan kell elrejteni a könyvjelző címe PageControl?
TabVisible nem alkalmas a könyvjelzők nem kell törölni magát, és kell, hogy a gombot, amitől meg kell találni.

Vagy talán valami más mondja meg, hogy ezt a problémát?
Van egy ötletem, hogy írjon egy varázsló rakpartok, amely szabványos az átmenetet a következő és az előző lapra vitte a Következő és az Előző gombok megnyomásával. PageControl is lehet baj, ha nem lennének ezek a hülye gombok :(

TabVisible - fit, de van egy bug elrejti a fülön (D4 is). Most dolgozom a D7, D6 - nem emlékszem, de a sár a futási lapon el kell tűnnie.


var
PagesHeight: integer = 0;

eljárás TfrmMain.chkInterfaceClick (Sender: TObject);
var
f1: logikai;
kezdődik;
ha PagesHeight = 0, akkor PagesHeight: = pcMain.Pages [0] .Top;
f1: = chkInterfaceShowPages.Checked;
ha f1 ezután kezdődik;
pcMain.Top:=0;
pcMain.Height: = panRight.Height + 3;
vég
máshol kezdődik;
pcMain.Top:=-PagesHeight;
pcMain.Height: = PagesHeight + panRight.Height + 3;
végén;
végén;

Ui pcMain fekszik panRight, align = None

2 Plohish:
F1:
===
Használja TabVisible átmenetileg eltávolítani egy lapot egy oldalra ellenőrzés. Amikor TabVisible False, a fül nem jelenik meg az oldalon ellenőrzési és Tabindex tulajdonság -1. Beállítás TabVisible Igaz lehetővé teszi a felhasználónak, hogy a lap a lapot újra.
===
És ismét mondom, hogy én elrejtőzzem lap nem szükséges, csak akkor kell, hogy elrejtse Tab. Még néhány okos javaslatot?
Emlékeztetem Önöket, hogy a D5

2 Sha:
Nem értem, mi a példa. Milyen lett pcMain?

2 Serge:
A Hidden Leaf ez egy hiba? A HELP a fekete és fehér.

És TabVisible akkor csak a felső szemetet rejtettek. Sheet maga marad.

tegye TabVisible: = hamis, a megfelelő TabSheet eltűnik. De ha írsz PageControla ActivePage tulajdonság a neve a rejtett TabSheet „, és akkor lesz olyan szép, mind a futási és dizayntayme. És amennyire vissza tudok emlékezni, egy dob Delphi, 4 (2) .. 7.

Röviden, tanulni felszerelések.

Ez nyírás egy dolgozó projekt.
Írja be chkInterface - TCheckBox.
Írja be panRight - TPanel.
Írja be pcMain - TPageControl, cserélje ki a RageControl.

A lényege például - a jelölőnégyzetre kattintva könyvjelzők megjelennek, majd eltűnnek. A felhasználó kiválaszt egy kényelmes felületen rá. Ott maradt több trivia.

Memória: 0,73 MB
Idő: 0.041 c