Ajouter un composant dans un autre

Description

Par exemple, vous pouvez essayer de glisser un TProgressBar dans unTStatusBar...
Ben vi mais non ca marche pas!

Alors le plus simple (oui parceque l'on pourrait dérivé un nouveau composant TStatusBar...) c'est de coder dans l'evenement OnCreate ceci :

Source / Exemple :


StatusBar1.ControlStyle := StatusBar1.ControlStyle + [csAcceptsControls]; 
ProgressBar1.Parent := StatusBar1; 
ProgressBar1.SetBounds(0, 2, 150, 16); 
ProgressBar1.BringToFront;

Conclusion :


Et boom comme par magis ca marche!

Remarque : Ceci ne marche qu'avec les composants dérivés de la class TControl.

Codes Sources

A voir également

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.