DYNAMIC |
Dynamique |
---|---|
Delphi/Kylix/Lazarus |
Syntaxe
function method(liste des parametres):typededonnees; Dynamic; |
procedure method(liste des parametres); Dynamic; |
Paramètres
Nom | Description |
---|---|
typededonnees | Ce paramètre permet d'indiquer le type de données |
method | Ce paramètre permet d'indiquer le nom de la méthode |
liste des parametres | Ce paramètre permet d'indiquer la liste des paramètres de la méthode |
Description
Ce mot réservé permet de définir une fonction pouvant être remplacé par une nouvelle fixation dans un objet de classe.
Exemple
Cet exemple permet de remplacer la méthode déclarer dans la classe parente :
- Program DynamicSamples;
-
- {$APPTYPE CONSOLE}
-
- Uses SysUtils;
-
- Type
- MonObjetA=Class
- Constructor Init;
- Procedure Run;
- Procedure Other;Dynamic;
- Function getValue:Char;Dynamic;
- End;
-
- MonObjetB=Class(MonObjetA)
- Function getValue:Char;Dynamic;
- End;
-
- Function MonObjetA.getValue:Char;Begin
- getValue := 'a';
- End;
-
- Function MonObjetB.getValue:Char;Begin
- getValue := 'b';
- End;
-
- Constructor MonObjetA.Init;Begin
- WriteLn('Initialisation de l''objet');
- End;
-
- Procedure MonObjetA.Run;Begin
- WriteLn('Exécution de l''objet');
- End;
-
- Procedure MonObjetA.Other;Begin
- WriteLn('Objet remplacable');
- End;
-
- Var
- Objet:MonObjetB;
-
- BEGIN
- Objet := MonObjetB.Init;
- Objet.Run;
- Objet.Other;
- WriteLn('Valeur = ',Objet.getValue);
- END.
on obtiendra le résultat suivant :
Initialisation de l'objetExécution de l'objet
Objet remplacable
Valeur = b
Voir également
Langage de programmation - Programmation Orientée Objet (POO) - Accueil
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - Abstract
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - Class
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - Function
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - Overload
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - Override
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - Procedure
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - Virtual