4D Write v14

WR DELETE TAB

Página Inicial

 
4D Write v14
WR DELETE TAB

WR DELETE TAB 


 

WR DELETE TAB ( area ; numTab ) 
Parâmetro Tipo   Descrição
area  Inteiro longo in Área 4D Write
numTab  Inteiro longo in Número de tabulação

O comando WR DELETE TAB apaga a tabulação cujo número é passado em numTab. Se outras tabulações se encontram  na mesma posição, também são apagados.

Nota: Se a seleção consiste de vários parágrafos, a numeração é relativa ao último parágrafo selecionado.

Exemplo  

Você quer apagar todas as tabulações presentes em seu documento:

 C_LONGINT(Area;$i;$TabNum;$uniform)
  `Inserir o cursor ao início da área
 WR SET SELECTION(Area;0;0)
  `Contagem do número de parágrafos no documento
 NbParag:=WR Count(Area;wr nb paragraphs)
  `Processamento de cada parágrafo
 For($i;1;NbParag)
  `Recuperar a posição do parágrafo
    WR GET PARAGRAPHS(Area;START;Pos)
  `Ir ao interior do parágrafo
    WR SET SELECTION(Area;START+1;START+1)
  `Obter o número de tabulações
    $TabNum:=WR Get text property(Area;wr tab;$uniform)
    While($TabNum#0)
       WR DELETE TAB(Area;1)
       $TabNum:=$TabNum-1
    End while
  `Reposição justo depois do último parágrafo processado
    WR GET SELECTION(Area;Pos;Pos)
 End for

 
PROPRIEDADES 

Produto: 4D Write
Tema: WR Tabulações
Número 89448

 
HISTÓRIA 

Criado por: 4D Write 6.5

 
VER TAMBÉM 

WR ADD TAB
WR DELETE STYLESHEET TAB

 
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)