Sign in Join
Wiki copytemporary

Inherited/fr: what changed

Revision 1 to 2. Removed lines have a minus sign; added lines have a plus sign.

OldNewLine
1-\
2-\
31Dans une méthode virtuelle, il est souvent nécessaire d'appeler l'implémentation de la méthode virtuelle de la classe parent. Ceci peut être fait avec le mot-clé **inherited**. De la mêm façon, le mot-clé **inherited** peut être employé pour toute méthode de la classe parent.
42
53Ce cas est le plus simple :
64
75``` pascal
86Type
97 TMyClass = Class(TComponent)
108 Constructor Create(AOwner : TComponent); override;
119 end;
1210
1311Constructor TMyClass.Create(AOwner : TComponent);
1412begin
1513 Inherited;
1614 // Do more things
1715end;
1816```
1917
2018## Cas des constructeurs et destructeurs
2119
2220Constructeur, Exemple 1 :\
2321
2422``` pascal
2523 ...
2624 TTest.Create;
2725 begin
2826 Inherited; // Toujours au début des constructeurs et démarre le constructeur (code seulement) de la classe parent
2927 ...
3028 end;
3129```
3230
3331Constructeur, exemple 2 :\
3432
3533``` pascal
3634 ...
3735 TTest.Create(...);
3836 begin
3937 Inherited Create(...); // Toujours au début des constructeurs et démarre le constructeur (code seulement) de la classe parent
4038 ...
4139 end;
4240 ...
4341```
4442
4543Destructeur, exemple 3 :\
4644
4745``` pascal
4846 TTest.Destroy;
4947 begin
5048 ...
5149 Inherited; // Toujours à la fin des destructeurs et démarre le destructeur (code seulement) de la classe parent
5250 end;
5351 ...
5452```
5553
5654---
5755*From the Free Pascal wiki, page "Inherited/fr", as it stood on 2020-02-17 after a change by Trev, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).*

Back to history