Composant TPageControl avec TTabSheet [Résolu]

phephelavi 40 Messages postés mardi 16 mai 2006Date d'inscription 27 octobre 2009 Dernière intervention - 19 janv. 2007 à 18:24 - Dernière réponse : phephelavi 40 Messages postés mardi 16 mai 2006Date d'inscription 27 octobre 2009 Dernière intervention
- 19 janv. 2007 à 20:04
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
Afficher la suite 

Votre réponse

2 réponses

phephelavi 40 Messages postés mardi 16 mai 2006Date d'inscription 27 octobre 2009 Dernière intervention - 19 janv. 2007 à 20:04
+3
Utile
A merci !

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

Bon week end
Cette réponse vous a-t-elle aidé ?  
Commenter la réponse de phephelavi
ThWilliam 424 Messages postés mardi 3 janvier 2006Date d'inscription 26 novembre 2013 Dernière intervention - 19 janv. 2007 à 19:24
0
Utile
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
Commenter la réponse de ThWilliam

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.