4D Write v14

WR Get stylesheet font

Página Inicial

 
4D Write v14
WR Get stylesheet font

WR Get stylesheet font 


 

WR Get stylesheet font ( area ; numFolha ) -> Resultado 
Parâmetro Tipo   Descrição
area  Inteiro longo in Área 4D Write
numFolha  Inteiro longo in Número da folha de estilo
Resultado  cadeia in Nome da fonte, ou "" se a fonte não está definida

O comando WR Get stylesheet font devolve o nome da fonte atribuída a folha de estilo cujo número é passado em numFolha na área 4D Write referenciada por area. As folhas de estilo são numeradas de cima para baixo como é visto no diálogo de folhas de estilo. Se nenhuma fonte foi definida para esta folha de estilo, é retornada uma cadeia vazia.

Exemplo  

Você quer excluir o atributo "Fonte" de cada folha de estilo onde se utiliza e onde a fonte não esteja instalada no sistema:

 ARRAY STRING(80;FontsArray)
 WR FONTS TO ARRAY(FontsArray)
 $StyleSheetNum:=WR Count(Area;wr nb stylesheets)
 For($i;1;$StyleSheetNum)
    $Fonts:=WR Get stylesheet font(Area;$i)
    If(($Fonts#"")&(Find in array(Area;$Fonts)=0))
       WR SET STYLESHEET FONT(Area;$i;"")
    End if
 End for

 
PROPRIEDADES 

Produto: 4D Write
Tema: WR Folha de estilo
Número 89462

 
HISTÓRIA 

Criado por: 4D Write 6.5

 
VER TAMBÉM 

WR Get font
WR SET STYLESHEET FONT

 
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)