Section courante

A propos

Section administrative du site

CLASS

Classe
Free Pascal  

Syntaxe

type
nomobjet = class
public
class function nomfonction(parametre):typededonnees; virtual;
class procedure nomprocedure(parametre); virtual;
:
end;
class procedure nomobjet.methode(paramètre);
begin
...
end;

Description

Ce mot réservé permet d'indiquer une méthode opérant sur une référence de classe plutôt que sur un objet de référence.

Exemple

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

  1. Program ClassSamples;
  2.  
  3. {$MODE OBJFPC}
  4.  
  5. Type
  6.  MyObject = Class
  7.   Public
  8.   X:Boolean;
  9.  End;
  10.  
  11.  MyObject2 = Class(MyObject)
  12.   Public
  13.   Y:Boolean;
  14.  End;
  15.  
  16. Var
  17.  CurrObject:MyObject;
  18.  OtherObject:MyObject2;
  19.  
  20. BEGIN
  21. END.


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