4D Write v16WR INSERT PAGE NUMBER |
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D Write v16
WR INSERT PAGE NUMBER
|
WR INSERT PAGE NUMBER ( zone ; format ; typePagination ) | ||||||||
Paramètre | Type | Description | ||||||
zone | Entier long |
![]() |
Zone 4D Write | |||||
format | Entier |
![]() |
Type de format | |||||
typePagination | Entier |
![]() |
Type de variable de pagination à insérer 0=numéro de page, 1=nombre de pages | |||||
La commande WR INSERER NUMERO DE PAGE permet d’insérer, à l'emplacement du curseur, une référence affichant le numéro de la page courante ou le nombre total de pages du document. Cette référence peut être placée dans le corps du document, en en-tête ou en pied de page. Utilisez la commande WR FIXER CADRE pour placer le curseur dans la partie de texte vous intéressant.
Le paramètre format permet de définir le format d'affichage de la variable insérée. Vous pouvez passer dans ce paramètre une des constantes du thème WR Formats numéro de page :
Constante | Type | Valeur | Comment |
wr 123 | Entier long | 0 | 1, 2, 3... |
wr abc | Entier long | 1 | a, b, c... |
wr ABC | Entier long | 2 | A, B, C... |
wr i ii iii | Entier long | 3 | i, ii, iii... |
wr I II III | Entier long | 4 | I, II, III... |
Le paramètre optionnel typePagination vous permet d'indiquer si vous souhaitez insérer le numéro ou le nombre de pages. Si vous passez la constante wr numéro de page (valeur 0) ou omettez ce paramètre, la commande insérera le numéro de page. Si vous passez la constante wr nombre de pages (valeur 1), la commande insérera le nombre de pages total du document.
La méthode PageImpaire suivante est associée à une variable placée en pied de page du document à l’écran :
`Teste si l'on est déjà en mode 'Paires Impaires différentes'
If(WR Get doc property(LaZone;wr different left right pages)#1)
`Si ce n'est pas le cas, on active ce mode
WR SET DOC PROPERTY(LaZone;wr different left right pages;1)
ALERT("Attention : le document est désormais en mode pages paires et impaires différentes !")
End if
`On se positionne dans le pied de page gauche
WR SET FRAME(LaZone;wr left footer)
`On y insère 'Page X' en majuscules romanes
WR INSERT TEXT(LaZone;"Page ")
WR INSERT PAGE NUMBER(LaZone;wr i ii iii;wr page number)
WR INSERT TEXT(LaZone;" sur ")
WR INSERT PAGE NUMBER(LaZone;wr i ii iii;wr total number of pages)
Produit : 4D Write
Thème : WR Objets dynamiques
Numéro :
89473
Modifié : 4D Write 6.5.3
4D Write - Langage ( 4D Write v16)