FORM Lire page courante

4D v20 R7


FORM Lire page courante {( * )} -> Résultat

Paramètre	Type	Description
*	Opérateur	Retourner le numéro de la page du sous-formulaire courant
Résultat	Entier long	Numéro de la page courante du formulaire courant

Description

FORM Lire page courante retourne le numéro de la page courante du formulaire actuellement affiché ou du formulaire courant chargé via la commande FORM CHARGER.

Le paramètre * est utile lorsque la commande est appelée dans le contexte d’un sous-formulaire en page contenant plusieurs pages. Dans ce cas, si vous passez ce paramètre, la commande retourne le numéro de la page courante du sous-formulaire courant (celui qui a appelé la commande). Par défaut, si le paramètre * est omis, la commande s’applique toujours au formulaire parent.

Exemple

Alors que vous êtes en train d'utiliser un formulaire, si vous choisissez une commande de menu ou si le formulaire reçoit un appel d'un autre process, vous voulez que des actions différentes soient effectuées en fonction de la page du formulaire affichée. Vous pouvez alors écrire :

  ` Méthode formulaire [maTable];"monFormulaire"

 Au cas ou

    :(Evenement formulaire=Sur chargement)

  ` ...

    :(Evenement formulaire=Sur libération)

  ` ...

    :(Evenement formulaire=Sur menu sélectionné)

       $vlNuméroMenu:=Menu choisi>>16

       $vlNuméroCmde:=Menu choisi & 0xFFFF

       Au cas ou

          :($vlNuméroMenu=...)

             Au cas ou

                :($vlNuméroCmde=...)

                :(FORM Lire page courante=1)

  ` Effectuer une action appropriée pour la page 1

                :(FORM Lire page courante=2)

  ` Effectuer une action appropriée pour la page 2

  ` ...

                :($vlNuméroCmde=...)

  ` ...

             Fin de cas

          :($vlNuméroMenu=...)

  ` ...

       Fin de cas

    :(Evenement formulaire=Sur appel extérieur)

       Au cas ou

          :(FORM Lire page courante=1)

  ` Fournir une réponse appropriée pour la page 1

          :(FORM Lire page courante=2)

  ` Fournir une réponse appropriée pour la page 2

       Fin de cas

  ` ...

 Fin de cas

Voir aussi

FORM ALLER A PAGE
FORM DERNIERE PAGE
FORM PAGE PRECEDENTE
FORM PAGE SUIVANTE
FORM PREMIERE PAGE