4D Write v16WR INSERT PAGE NUMBER |
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D Write v16
WR INSERT PAGE NUMBER
|
WR INSERT PAGE NUMBER ( area ; formato ; tipoPag ) | ||||||||
Parâmetro | Tipo | Descrição | ||||||
area | Inteiro longo |
![]() |
Área 4D Write | |||||
formato | Inteiro |
![]() |
Tipo de formato | |||||
tipoPag | Inteiro |
![]() |
Número a inserir 0 = Número de página, 1 = Número total de páginas | |||||
O comando WR INSERT PAGE NUMBER permite inserir na posição do cursor, uma referencia que mostra o número de página atual ou o número total de páginas. Esta referencia pode ser localizada no texto principal, no rodapé da página ou no cabeçalho. Pode utilizar o comando WR SET FRAME para colocar o cursor na área que escolha.
formato lhe permite escolher o formato de saída da variável inserida. Neste parâmetro, pode passar uma das seguintes constantes do tema WR Page number formats:
Constante | Tipo | Valor |
wr 123 | Inteiro longo | 0 |
wr abc | Inteiro longo | 1 |
wr ABC | Inteiro longo | 2 |
wr i ii iii | Inteiro longo | 3 |
wr I II III | Inteiro longo | 4 |
O parâmetro opcional tipoPag permite inserir o número de página atual ou o número total de páginas do documento atual. Se passar a constante wr page number (valor 0) ou se omitir este parâmetro, é inserido o número de página atual. Se passar a constante wr total number of pages (valor 1), se insere o número total de páginas do documento.
O seguinte método (OddPages) está associado a uma variável inserida no rodapé de página do documento atual:
`Revisão de se o modo "Diferente em páginas esquerda e direita" já está ativado
If(WR Get doc property(Area;wr different left right pages)#1)
`Se não, ativar este modo
WR SET DOC PROPERTY(Area;wr different left right pages;1)
ALERT("Atenção: o documento já está em modo 'Diferente em páginas esquerda e direita")
End if
`Localizamos o cursor no rodapé de página esquerdo
WR SET FRAME(Area;wr left footer)
`Inserimos 'Page X' em maiú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)
Produto: 4D Write
Tema: WR Objetos dinâmicos
Número
89473
Modificado: 4D Write 6.5.3
4D Write - Linguagem ( 4D Write v16)