Salut mastok007
J'ai essaye ceci et cela fonctionne


void __fastcall TForm1::PageControl1Change(TObject *Sender)
{
if (((TPageControl *)Sender)->ActivePage == TabSheet2)
{...