Instance

Variable système

Désignation :

Numéro d'instance de l'objet courant

Type :

Entier

Modifiable :

Non

Défaut :

  

Elle permet de récupérer le numéro d'instance de l'objet courant.

 

 

InstanceCreee, EtatTable, AppliquerMethodeAppelant

Exemple :

Composant ARTICLE

Objet GESTION : GESTION "Gestion des articles"


Methode DEBUT

    AppliquerMethodeComposant BUREAU.AJOUTER(NomComposant,CodeObjet,Instance,Titre)

  FinMethode

 

FinObjet

 

...

 

Composant BUREAU

Objet FENETRE_SIMPLE : LISTE_OBJETS "Liste des fenêtres ouvertes"

  Declaration

    Parametres:

      Chaine pComposant

      Chaine pCodeObjet

      Entier pInstance

      Chaine pTitre

  FinDeclaration

 

  Methode AJOUTER

    InitTampon TABLE

    TABLE.COMPO = pComposant

    TABLE.CO = pCodeObjet

    TABLE.IO = pInstance

    TABLE.TO = pTitre

    Ecrire TABLE

    Afficher "LST"

  FinMethode

 

  Methode LST_CHOIX

    Variables : Chaine vco,vcompo ; Entier vio

    vcompo = TABLE.COMPO

    vco = TABLE.CO

    vio = TABLE.IO

    ActiverObjet vcompo.vco[vio]

  FinMethode

 

  Methode QUITTER_FENETRE

    Variables : Chaine vco,vcompo ; Entier vio

    vcompo = TABLE.COMPO

    vco = TABLE.CO

    vio = TABLE.IO

    EnvoyerMessage vcompo.vco[vio]."AVANT_SORTIE"[-1000]

  FinMethode  

 

FinObjet