4D Write v16

WR INSERT PAGE NUMBER

Inicio

 
4D Write v16
WR INSERT PAGE NUMBER

WR INSERT PAGE NUMBER 


 

WR INSERT PAGE NUMBER ( area ; formato ; tipoPag ) 
Parámetro Tipo   Descripción
area  Entero largo in Área 4D Write
formato  Entero in Tipo de formato
tipoPag  Entero in Número a insertar 0 = Número de página, 1 = Número total de páginas

El comando WR INSERT PAGE NUMBER permite insertar en la posición del cursor, una referencia que muestra el número de página actual o el número total de páginas. Esta referencia puede ubicarse en el texto principal, en el pie de página o en el encabezado. Puede utilizar el comando WR SET FRAME para colocar el cursor en el área que elija.

formato le permite elegir el formato de salida de la variable insertada. En este parámetro, puede pasar una de las siguientes constantes del tema WR Formatos número de página:

Constante Tipo Valor
wr 123 Entero largo 0
wr abc Entero largo 1
wr ABC Entero largo 2
wr i ii iii Entero largo 3
wr I II III Entero largo 4

El parámetro opcional tipoPag permite insertar el número de página actual o el número total de páginas del documento actual. Si pasa la constante wr page number (valor 0) o si omite este parámetro, se inserta el número de página actual. Si pasa la constante wr total number of pages (valor 1), se inserta el número total de páginas del documento.

Ejemplo  

El siguiente método (OddPages) está asociado a una variable insertada en el pie de página del documento actual:

  `Revisión de si el modo "Diferente en páginas izquierda y derecha" ya está activado
 If(WR Get doc property(Area;wr different left right pages)#1)
  `Si no, activar este modo
    WR SET DOC PROPERTY(Area;wr different left right pages;1)
    ALERT("Atención: el documento ya está en modo 'Diferente en páginas izquierda y derecha")
 End if
  `Ubicamos el cursor en el pie de página izquierdo
 WR SET FRAME(Area;wr left footer)
  `Insertamos 'Page X' en mayúsculas romanas
 WR INSERT TEXT(Area;"Page ")
 WR INSERT PAGE NUMBER(Area;wr i ii iii;wr page number)
 WR INSERT TEXT(Area;" on ")
 WR INSERT PAGE NUMBER(Area;wr i ii iii;wr total number of pages)



Ver también 

WR GET PAGE NUMBER FORMAT
WR SET FRAME

 
PROPIEDADES 

Producto: 4D Write
Tema: WR Objetos dinámicos
Número 89473

 
HISTORIA 

Modificado: 4D Write 6.5.3

 
ARTICLE USAGE

4D Write - Lenguaje ( 4D Write v16)