Pagecontrol et Tabsheet

Bonjour !

J'ai un petit souci....
J'ai dans ma Form un control PageControl avec plusieurs TabSheets, disons TabSheet1 et TabSheet2 :)
J'aimerais qu'en cliquant sur TabSheet2, si une certaine condition est remplie, que celle-ci ne s'affiche pas mais qu'on reste putôt sur TabSheet1.

J'ai essayé ça :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

void __fastcall TForm1::TabSheet2Enter(TObject *Sender) { if(condition) { PageControl1->ActivePage = TabSheet1; TabSheet1->Show(); MessageBox(Handle,"marche pas","Avertissement",MB_OKCANCEL|MB_ICONSTOP ) ; return; } else { .....

---

Le message s'affiche bien lorsque la condition est remplie, mais malheureusement, je reste sur la TabSheet2. J'arrive pas à revenir sur la TabSheet1...

Des idées ?? Merci beaucoup !

Juste pour préciser les choses...

ce n'est pas en fait la fonction "TabSheet2Enter" mais la fonction "TabSheet2Show" que j'utilise. Désolé pour l'erreur.
J'ai essayé de faire la même chose cependant avec "TabSheet2Enter" et là c'est pire, je n'entre même pas dans ma routine ?!

Normalement le fait d'assigner ton TabSheet1 à la propriété ActivePage est suffisant, pas besoin de faire le Show en plus.

Pottiez....
c'est bien ce que je pensais, mais malheureusement ça ne marche pas !

Du coup j'ai essayé de mettre un bouton sur ma Form avec la même commande que j'ai écrite... et ça marche :? Je comprends plus rien.

La question que je me pose : étant donné que à la propriété ActivePage est appelée lorsque je clique sur une tab, donc quand l'évènement OnShow est détecté, je me demande si l'affichage de la tab n'est pas forcé ??

Par ailleurs, j'ai tenté ça aussi :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

void __fastcall TForm1::TabSheet2Enter(TObject *Sender) { if() { PageControl1->ActivePage = TabSheet1; TabSheet2->Hide(); TabSheet1->Show(); PageControl1->Repaint(); MessageBox(Handle,"La table est vide !","Avertissement",MB_OKCANCEL|MB_ICONSTOP ) ; PageControl1->ActivePage = TabSheet1; TabSheet2->Hide(); TabSheet1->Show(); PageControl1->Repaint(); return; } else { ...

---

histoire d'être bien sur qu'on affiche pas la TabSheet2 et qu'on ne montre que la TabSheet1...
Résultat : La TabSheet2 n'apparaît pas, la 1 reste apparente, la boite de message s'affiche, mais là, une fois que la boite de message disparaît, la TabSheet2 est activée ! J'y comprends plus rien.

Ca doit être parce qu'il active les page après les évènements, certain évènement se produisent avant l'action et d'autre après, c'est spécifié dans l'aide normalement.

Bon ben je crois que j'ai trouvé ma solution, merci le forum JBuilder :)

Alors plutôt que de mettre ma condition dans l'appel du TabSheetShow(), j'ai utilisé les évènements de la PageControl :

PageControl->OnChanging et PageControl->OnChange

Mais là encore il a fallu que je multiplie les conditions, c'est-à-dire que je mette ma condition dans le OnChanging et le OnChange, et comme ça suffisait pas, il a fallu aussi que je mette la condition dans le TabSheet->OnShow() puisque je me suis aperçu que celle-ci était lancée même si la table n'était pas active !

Bref ça fait un peu lourd, c'est surement juste du patchage, mais ça marche. J'avoue c'est pas ce qu'il y a de plus élégant, mais j'ai vraiment pas trouvé d'autre solution....