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 :
Le message s'affiche bien lorsque la condition est remplie, mais malheureusement, je reste sur la TabSheet2. J'arrive pas à revenir sur la TabSheet1...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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 { .....
Des idées ?? Merci beaucoup !
Partager