Section courante

A propos

Section administrative du site

OBJECT

Objet
Turbo Pascal pour Windows

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

on obtiendra le résultat suivant :

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


Dernière mise à jour : Dimanche, le 10 décembre 2017