PRIVATE |
Privé |
|---|---|
| Delphi/Kylix/Lazarus | |
Syntaxe
|
type NomForme = class(Form) private Déclarationsprivées end; |
Paramètres
| Nom | Description |
|---|---|
| Déclarationsprivées | Ce paramètre permet d'indiquer les définitions privés |
| NomForme | Ce paramètre permet d'indiquer le nom de la classe |
Description
Ce mot réservé permet d'indiquer que les définitions suivantes sont accessibles uniquement dans l'unité où est définit l'objet.
Exemple
Voici des exemples de l'utilisation de cette instruction :
- Program PrivateSamples;
-
- {$APPTYPE CONSOLE}
-
- Uses SysUtils;
-
- Type
- MyObject = Class
- Private
- Y:Boolean;
- Z:Integer;
- Public
- Property X:Boolean Read Y Write Y;
- Function GetY:Boolean;
- End;
-
- Function MyObject.GetY:Boolean;Begin
- Z:=12;
- GetY:=Y;
- End;
-
- Var
- CurrObject:MyObject;
-
- BEGIN
- CurrObject.Create;
- CurrObject.X:=True;
- If(CurrObject.GetY)Then Begin
- WriteLn('Valeur de Y est vrai');
- End
- Else
- Begin
- WriteLn('Valeur de Y est fausse');
- End;
- END.
on obtiendra le résultat suivant :
Valeur de Y est vraiVoir également
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) - Procedure
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - Property
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - Protected
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - Public
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - Published
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - Type