4D Write v14

WR SET PICTURE IN PAGE INFO

Página Inicial

 
4D Write v14
WR SET PICTURE IN PAGE INFO

WR SET PICTURE IN PAGE INFO 


 

WR SET PICTURE IN PAGE INFO ( area ; numImagem ; pagina ; atras ; pagUm ; posHor ; verticalPos ; largo ; alto ) 
Parâmetro Tipo   Descrição
area  Inteiro longo in Área 4D Write
numImagem  Inteiro longo in Número da imagem
pagina  Inteiro longo in Localização da imagem
atras  Inteiro in 0=imagem sobre o texto 1=imagem atrás do texto
pagUm  Inteiro in ***Obsoleto, não utilizar***
posHor  Inteiro longo in Posição horizontal na página
verticalPos  Inteiro longo in Posição vertical na página
largo  Inteiro longo in Largura atual da imagem
alto  Inteiro longo in Altura atual da imagem

O comando WR SET PICTURE IN PAGE INFO lhe permite modificar as propriedades da imagem, cujo número é passado em numImagem.

Atenção: Este comando não deve ser usado com imagens que se encontrem no texto.

pag permite definir as páginas em que é mostrada a imagem. Para isso, passe o número de página em pag. Este número deve ter em conta a numeração de páginas, definida no diálogo de preferências.

  • Se pag é igual a -11, a imagem será visível nas páginas da direita se os cabeçalhos pares e impares são diferentes, caso contrário, será visível em cada página.
  • Se pag é igual a -12, a imagem será visível nas páginas da esquerda se os cabeçalhos pares e impares são diferentes.
  • Se pag é igual a -4, o valor anterior não se modifica.

atras: neste parâmetro, pode passar uma das seguintes constantes do tema "WR Parâmetros":

Constante Tipo Valor
wr above text Inteiro longo 0
wr behind text Inteiro longo 1

pagUm: este parâmetro somente é conservado por razões de compatibilidade e não deve  ser utilizado a partir da versão 2004. Passe -1 para ignorar.

posHor e posVer lhe permitem definir as coordenadas da esquina superior esquerda da imagem em relação com a esquina superior esquerda da página. O valor de posHor pode estar entre 0 e o largo total da página. Neste caso, as margens da impressora não serão levadas em consideração e a imagem pode terminar localizada fora da área imprimível da página.

Nota: Ao colar uma imagem no entorno do usuário, as margens da impressora são levadas em conta.

largo e alto permitem definir as novas dimensões da imagem. Os valores se expressam na unidade por padrão do documento.

Nota: Se passar -1 nos seguintes parâmetros não modificará seu valor inicial: atras, pagUm, posHor, posVer, largo e alto.

Exemplo  

Você quer inserir a mesma imagem no cabeçalho de todos seus documentos:

 C_REAL($PosHoriz;$PosVert;$PictWidth;$PictHeight;$OrigWidth;$OrigHeight;$TxtMgTop;$HeadMgBottom)
 WR SET DOC PROPERTY(Area;wr view mode;0)
 $PosHoriz:=WR Get doc property(Area;wr text left margin)
 $PosVert:=WR Get doc property(Area;wr header top margin)
 ALL RECORDS([Interface])
  `Inserção da imagem
 WR INSERT PICTURE(Area;[Interface]Logo;-1;$PosHoriz;$PosVert;1;0) `Picture is stored in the Logo field
 WR SELECT PICTURE IN PAGE(Area;1) `Seleção da imagem
  `Leitura das propriedades da imagem
 MyPict:=WR Get selected picture(Area;$NumPict)
 WR GET PICTURE IN PAGE INFO(Area;$NumPict;$Page;$Behind;$PageOne;$PosHoriz;$PosVert;
 $PictWidth;$PictHeight;$OrigWidth;$OrigHeight)
  `Redução da imagem de 50%
 $PictHeight:=$PictHeight*1/2
 $PictWidth:=$PictWidth*1/2
 WR SET PICTURE IN PAGE INFO(Area;$NumPict;$Page;$Behind;$PageOne;$PosHoriz;$PosVert;
 $PictWidth;$PictHeight)
  `Verificação de que o cabeçalho "cobre" o logo
 $TxtMgTop:=WR Get doc property(Area;wr text top margin)
 $HeadMgBottom:=WR Get doc property(Area;wr header bottom margin)
 WR SET DOC PROPERTY(Area;wr text top margin;$PosVert+$PictHeight+
 $TxtMgTop+$HeadMgBottom)
 WR SET DOC PROPERTY(Area;wr header bottom margin;$PosVert+$PictHeight)

 
PROPRIEDADES 

Produto: 4D Write
Tema: WR Gestão de imagens
Número 89486

 
HISTÓRIA 

Modificado: 4D Write 2004

 
VER TAMBÉM 

WR GET PICTURE IN PAGE INFO

 
ARTICLE USAGE

4D Write - Linguagem ( 4D Write v11.6)
4D Write - Linguagem ( 4D Write v12)
4D Write - Linguagem ( 4D Write v14)
4D Write - Linguagem ( 4D v13)
4D Write - Linguagem ( 4D Write v14 R2)
4D Write - Linguagem ( 4D Write v14 R3)
4D Write - Linguagem ( 4D Write v14 R4)