| 4D v18FORM Get current page | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| 
 | 
    4D v18
 FORM Get current page 
         | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| FORM Get current page {( * )} -> 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 | |||||
FORM Get current page retourne le numéro de la page courante du formulaire actuellement affiché ou du formulaire courant chargé via la commande FORM LOAD.
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.
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"
 Case of
    :(FORM Event=On Load)
  ` ...
    :(FORM Event=On Unload)
  ` ...
    :(FORM Event=On Menu Selected)
       $vlNuméroMenu:=Menu selected>>16
       $vlNuméroCmde:=Menu selected & 0xFFFF
       Case of
          :($vlNuméroMenu=...)
             Case of
                :($vlNuméroCmde=...)
                :(FORM Get current page=1)
  ` Effectuer une action appropriée pour la page 1
                :(FORM Get current page=2)
  ` Effectuer une action appropriée pour la page 2
  ` ...
                :($vlNuméroCmde=...)
  ` ...
             End case
          :($vlNuméroMenu=...)
  ` ...
       End case
    :(FORM Event=On Outside Call)
       Case of
          :(FORM Get current page=1)
  ` Fournir une réponse appropriée pour la page 1
          :(FORM Get current page=2)
  ` Fournir une réponse appropriée pour la page 2
       End case
  ` ...
 End case
									FORM FIRST PAGE
									
									FORM GOTO PAGE
									
									FORM LAST PAGE
									
									FORM NEXT PAGE
									
									FORM PREVIOUS PAGE
									
	Produit :  4D
	Thème :  Formulaires
	Numéro :  
        276
        
        
        
	
	Créé :  < 4D v6
	Renommé : 4D v12
	Modifié :  4D v13
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	
	4D - Langage ( 4D v18)
	
	
	
	
	
 Ajouter un commentaire
Ajouter un commentaire