UpsSys.UniteListee

Définition


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

Type UniteListee Defaut Final TailleSegment 8 ConserverObjets

/* Objet : Unite retourne par ListerUnites. */

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

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

/* Heritage des proprietes d'Objet.  */

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

Prive :

	
	EstInstanceDe : Type Lecture Public;

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

/* Proprietes propres.    					      */

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

Prive :

	
	NomUnite : Caractere Lecture Public Trace;
	

	Unite : SorteUnite Lecture Public Trace;
	

	PlaceLibre : Reel Lecture Public;
	

	PlaceTotale : Reel Lecture Public; 

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

/* 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();

Prive :

	
   Destructeur(MettreEnAnteMemoire : Booleen) Retourner Booleen;

Fin Type

Le type UniteListee possède un constructeur implicite.

Opérateurs

Le type UniteListee possède les opérateurs standards suivant :

= pour l'affectation d'une unité listée dans un autre.
== pour l'égalité entre deux unités listées. Le résultat est un booléen.
!= pour l'inégalité entre deux unités listées. Le résultat est un booléen.

Exemple

Pour un exemple complet, merci de se référer à Usage des fonctions du système d'exploitation.

Principal /*******/ Variable /******/


	L : Nul Ou ListeDe UniteListee;

	U : Nul Ou UniteListee;




Debut

L=ListerUnites();

/* Liste les unités disponibles. */

Pour U=L.ParcoursAuDebut() JusquA L.DernierElement() Faire

/* Affiche les noms des unités. */

	Ecran.Ecrire(U.NomUnite+"\n");

Fin Pour

Fin Principal

Traduction


-	-	-	-	-	-	-	-	-