Section courante

A propos

Section administrative du site

OBJECT

 Objet
Free Pascal  

Syntaxe

Object[(parent)]

Paramètres

Nom Description
parent Ce paramètre permet d'indiquer objet parent optionnel

Description

Ce mot réservé permet de définir des objets (classe) dans la POO (Programmation Orienté Objet).

Exemple

Voici un exemple de l'utilisation de ce mot réservé :

  1. Program ObjectSamples;
  2.  
  3. Type
  4.  MonObjet=Object
  5.   Constructor Init;
  6.   Procedure Run;
  7.  End;
  8.  
  9.  MonObject2=Object
  10.   A,B,C:Boolean;
  11.  End;
  12.  
  13.  MonObject3=Object(MonObject2)
  14.   D,E,F:Integer;
  15.  End;
  16.  
  17. Constructor MonObjet.Init;Begin
  18.  WriteLn('Initialisation de l''objet');
  19. End;
  20.  
  21. Procedure MonObjet.Run;Begin
  22.  WriteLn('Exécution de l''objet');
  23. End;
  24.  
  25. Var
  26.  Objet:MonObjet;
  27.  
  28. BEGIN
  29.  Objet.Init;
  30.  Objet.Run;
  31. END.

on obtiendra le résultat suivant :

Initialisation de l'objet
Exécution de l'objet

Dernière mise à jour : Dimanche, le 28 février 2016