| 4D v13WR GET STYLESHEET TAB | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| 
 | 
    4D Write v13
 WR GET STYLESHEET TAB 
         | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| WR GET STYLESHEET TAB ( area ; numFolha ; numTab ; posicao ; justificaçao ; caracterCond ) | ||||||||
| Parâmetro | Tipo | Descrição | ||||||
| area | Inteiro longo |   | Área 4D Write | |||||
| numFolha | Inteiro longo |   | Número da folha de estilo | |||||
| numTab | Inteiro longo |   | Número de tabulação | |||||
| posicao | Inteiro longo |   | Posição da tabulação | |||||
| justificaçao | Inteiro |   | Valor de alinhamento da tabulação | |||||
| caracterCond | cadeia |   | Caractere de condução escolhido | |||||
O comando WR GET STYLESHEET TAB permite recuperar os parâmetros da tabulação, de número numTab e que pertence a folha de estilo numFolha na área 4D Write referencia por area.
Para conhecer o número de tabulações da folha de estilo, pode utilizar: WR GET STYLESHEET INFO (area;numFolha;wr tab;aplicarA), que devolve o número de tabulações.
posicao é a distância desde a margem esquerda do documento a tabulação, expressada nas unidades por padrão atuais do documento.
alinhamento é o tipo de alinhamento da tabulação:
| Valor | Alinhamento | 
| 1 | Alinhamento a esquerda | 
| 2 | Centrada | 
| 3 | Alinhamento a direita | 
| 4 | Decimal | 
| 5 | Separador vertical | 
caracterCond pode ser qualquer caractere cujo código esteja entre 33 e 127. Se caracterCond é uma cadeia vazia, então não há nenhum caractere de preenchimento na tabulação.
Você quer mudar os caracteres de enchimento para cada folha de estilo e depois atualizar seu documento.
 $StyleSheetNum:=WR Count(Area;wr nb stylesheets)
 For($i;1;$StyleSheetNum)
    $TabNum:=WR Get stylesheet text prop(Area;$i;wr tab;$Apply)
    If($TabNum#0)
       For($j;1;$TabNum)
          WR GET STYLESHEET TAB(Area;$i;$j;$Pos;$Justif;$FillChar)
          If($FillChar#"")
             WR SET STYLESHEET TAB(Area;$i;$j;$Pos;$Justif;Char(126))
          End if
       End for
       WR UPDATE STYLESHEET(Area;$i)
    End if
 End for
	Produto: 4D
	Tema: WR  Folha de estilo
	Número 
        89441
        
        
        
	
	Criado por: 4D Write 6.5
WR ADD STYLESHEET TAB
WR GET TAB
WR SET STYLESHEET TAB