UpsGng.Point

Définition


/***************************************************************/

Type Point Defaut TailleSegment 4 ConserverObjets

/* Objet : Definition d'un point.                     			  */

/***************************************************************/

/*-------------------------------------------------------------*/

/* Heritage des proprietes d'Objet.  */

/*-------------------------------------------------------------*/

Prive :

	
	EstInstanceDe : Type Lecture Public;

/*-------------------------------------------------------------*/

/* Proprietes propres.                     					      */

/*-------------------------------------------------------------*/

Public :

	
   X : Reel Trace;
	

   Y : Reel Trace;

/*-------------------------------------------------------------*/

/* Heritage des methodes d'Objet.    					      */

/*-------------------------------------------------------------*/

Public :

	
	Fonction Optimiser(Invariant) Identique(O : Nul Ou Objet) Retourner Nul Ou Booleen;
	

	Procedure Convertir(O : Nul Ou Objet);
	

	Fonction Optimiser(Invariant) CreeParLeServeur() Retourner Entier;
	

	Fonction Optimiser(Invariant) CreeParLeProcessus() Retourner Entier;
	

	Fonction Optimiser(Invariant) CreeDansLEntrepot() Retourner Entrepot;
	

	Fonction Cloner(EntrepotCible : Nul Ou Entrepot=Nul, Profondeur : ModeClonage = ClonageObjetSeul) Retourner Nul Ou Objet;
	

	Fonction LirePropriete(NomPropriete : Caractere) Retourner Nul Ou Objet;
	

	Procedure EcrirePropriete(NomPropriete : Caractere, Valeur : Nul Ou Objet);
	

	Fonction IncrementerDecrementerPropriete(NomPropriete : Nul Ou Caractere, Incrementer : Booleen, Prefixe : Booleen) Retourner Nul Ou Objet;
	

	Procedure SupprimerPropriete(NomPropriete : Caractere);
	

	Fonction Optimiser(Invariant) EnumererProprietes(NumeroPropriete : Entier, TypePropriete : Nul Ou Type=? Sortie, PeutEtreNul : Booleen=? Sortie, Aide : Nul Ou Caractere=? Sortie, NomEnumere : Nul Ou Caractere=? Sortie) Retourner Nul Ou Caractere;
	

	Fonction Optimiser(Invariant) Adresse() Retourner Nul Ou Caractere;

Prive :

	
	Fonction Exporter(E : Nul Ou IEchangeElementaire) Retourner Boolean;
	

	Fonction Importer(E : Nul Ou IEchangeElementaire, EntrepotCible : Nul Ou Entrepot=Nul, EstFiltre : Booleen=Faux, V : Entier=0, R : Entier=0, C : Entier=0) Retourner Nul Ou Objet;

/*-------------------------------------------------------------*/

/* Methodes propres.                                           */

/*-------------------------------------------------------------*/

Public :

	
   Constructeur();
	

   Constructeur(XX : Reel, YY : Reel);
	

   Operateur Optimiser(Invariant, NulAbsorbant) ==(P : Nul Ou Point) Retourner Nul Ou Booleen;
	

   Operateur Optimiser(Invariant, NulAbsorbant) !=(P : Nul Ou Point) Retourner Nul Ou Booleen;

Prive :

	
   Destructeur(MettreEnAnteMemoire : Booleen) Retourner Booleen;

Fin Type

Le type Point modélise un point d'une figure géométrique.

Le type Point possède deux constructeurs :

Un implicite l'initialisant à (0, 0).
Un explicite l'initialisant aux coordonnées (XX, YY).

Opérateurs

Le type Point possède les opérateurs standards suivants :

== pour l'égalité entre deux points. Le résultat est un booléen.
!= pour l'inégalité entre deux points. Le résultat est un booléen.
= pour l'affectation d'un point dans un autre.

Exemple


Principal

/*******/

Variable

/******/


	P1 : Nul Ou Point;

	P2 : Nul Ou Point;



Debut

...

Si P1==P2 Alors

/* Egalité entre deux points. */


	...

Fin Si

Si P1!=P2 Alors

/* Inégalité entre deux points. */


	...

Fin Si

...

Fin Principal

Traduction


-	-	-	-	-	-	-	-	-