PV LIRE CELL ACTIVE PRECEDENT

version 6.8

PV LIRE CELL ACTIVE PRECEDENT (zone; colonne; ligne)

La commande PV LIRE CELL ACTIVE PRECEDENT retourne dans les paramètres colonne et ligne les coordonnées de la cellule active précédente de la zone.

Note : Il n'y a pas de "pile" de cellules actives, seule la cellule active précédente peut être connue — et non celles qui étaient actives au préalable. Il vous appartient donc de gérer la mémorisation des cellules actives successives en cas de besoin, par exemple pour installer plusieurs niveaux d'annulation.

Dans l'exemple ci-dessous, nous allons créer un effet de "rebond" sur une cellule donnée. Mettons en place une méthode de gestion des événements, qui sera appelée à chaque changement de cellule active :

   PV APPELER SUR EVENEMENT(Zone;pv sur nouvelle cellule active;"MéthodeEvénement")

La méthode projet MéthodeEvénement fait "rebondir" l'utilisateur sur la cellule C5. Dès que cette dernière cellule est atteinte, c'est la cellule courante précédente qui redevient active, interdisant de ce fait la sélection de C5 par quelque moyen que ce soit : commande 4D View, touche clavier, souris, etc.

      `Méthode : MéthodeEvénement
      `Avec cette méthode, nous "rebondissons" sur la cellule C5

   C_ENTIER LONG ($1)  `Référence de la zone 4D View
   C_ENTIER LONG ($2)  `Événement
   C_ENTIER LONG ($3)  `Code de la touche de modification
   C_ENTIER LONG ($4)  `Numéro de la colonne
   C_ENTIER LONG ($5)  `Numéro de la ligne
   C_ENTIER LONG ($6)  `Code ASCII de la touche
   C_ENTIER LONG ($Colonne;$Ligne)  `Coordonnées de la cellule (courante puis précédente)
   C_BOOLEEN($0)   `Retour de fonction

   $0:=Faux

   PV LIRE CELLULE COURANTE ($1;$Colonne;$Ligne)  `Récupération des coordonnées

   Si ($Colonne=3) & ($Ligne=5)  `La cellule C5 est courante
      PV LIRE CELL ACTIVE PRECEDENT ($1;$Colonne;$Ligne)  `Cellule précédente
       PV ALLER A CELLULE ($1;$Colonne;$Ligne)  `Redevient courante
   Fin de si

PV ALLER A CELLULE, PV APPELER SUR ERREUR.