Composant TPageControl avec TTabSheet [Résolu]

Signaler
Messages postés
40
Date d'inscription
mardi 16 mai 2006
Statut
Membre
Dernière intervention
27 octobre 2009
-
Messages postés
40
Date d'inscription
mardi 16 mai 2006
Statut
Membre
Dernière intervention
27 octobre 2009
-
Bonjour,

Je cherche le moyen de supprimer une page (TTabSheet) d'un composant TPageControl. On peut le faire
en mode conception mais aucune méthode pour pouvoir le faire en mode exécution.

Quand l'utilisateur termine une procédure dans mon programme, je souhaiterais supprimer l'onglet concerné, hors je n'ai trouvé que TabVisible := false. L'onglet est bien caché mais quand l'utilisateur en crée un nouveau, celui qui était caché réapparait.

Donc, je préférais le supprimer quitte à repositionner tous les index après.

Si vous avez une idée, merci d'avance

Cordialement

Phephelavi

2 réponses

Messages postés
40
Date d'inscription
mardi 16 mai 2006
Statut
Membre
Dernière intervention
27 octobre 2009

A merci !

Je l'avais oublie ce FREE ! Naturellement pour supprimer un objet.
Ca marche !

Bon week end
Messages postés
418
Date d'inscription
mardi 3 janvier 2006
Statut
Membre
Dernière intervention
26 novembre 2013
3
Salut,

Supprimer un TabSheet :  tout simplement avec Free.

Exemple : suppression de l'onglet 1 :

procedure TForm1.Button1Click(Sender: TObject);
begin
   with PageControl1 do
     Pages[1].Free;
end;

A +
Thierry