Discussion :

[Laskar]

Salut Delphinautes,

En programmation objet en général (et avec Delphi en particulier) savez-vous comment en peut déshériter ses enfants ? Je m'explique avec un exemple : lorsque j'écris une classe dérivée d'un objet, style ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
type
  TMonPanel = class(TPanel);

comment faire pour que mon objet TMonPanel n'hérite pas de l'inutile propriété Caption de son ancêtre TPanel ?

Merci

[tourlourou]

Je ne pense pas que cela soit possible.

Si tu veux le faire disparaître, surcharge le GetText (ou autre SetText) de manière qu'il lui attribue systématiquement EmptyStr, ou surcharge la procédure de dessin.

Mais au final, il vaut parfois mieux partir de l'ancêtre (TCustomPanel ?) ou "composer" soi-même que de "bricoler" !

[Andnotor]

TPanel ne fait que publier les propriétés de TCustomPanel.
Fais comme Tourlourou le propose : dérive ta classe de TCustomPanel et ne rend visible que les propriétés qui te sont nécessaires.