Rendre invisible le contenu d'un TabSheet

Bonjour,

J'ai un TTabControl avec 3 TTabSheet, quand j'arrive sur l'ecran contenant ce TTabControl je dois voir apparaitre les 3 TTabSheet mais leur contenu doit etre invisible(il ne sera visible que si l'on coche dans une case).

Existe-t-il une facon simple de gérer cette invisibilité? (les composants dans les tabsheet n'ont pas de nomage normé...)

Merci.

Il aurait été plus simple de gérer l'invisibilité de la page :?

Quoi qu'il en soit, le tabsheet est le parent des composants qu'il contient.
Tu devrais t'en sortir avec une boucle en ce sens.

Salut !

Comme dit qi130 une simple boucle suffit:P

Tu peux écrire une procédure comme celle-ci:

Code:

---

1 2 3 4 5 6 7 8 9

procedure TForm1.DisplayHideControls(AIndex: Integer; AVisible: Boolean); var i: integer; begin with PageControl1.Pages[AIndex] do begin for i := 0 to ControlCount - 1 do Controls[i].Visible := AVisible; end; end;

---

Et l'appeler par exemple ainsi:

Code:

---

1 2	DisplayHideControls(0, True);

---

@+

D'accord,
Merci!!

salut, pour ma part j'ai eu ce petit problème; j'ai simplement placé mes composants dans des groupbox.

je peux ainsi afficher les composant de mon choix et meme faire plusieur group sur la meme page...8-)

on peut faire aussi comme ca:

Code:

---

xTabSheet.TabVisible:= False

---