4D Doc Center : WR GET WORDS

4D Write v14

WR GET WORDS


WR GET WORDS ( area ; inicioSel ; fimSel ; smartCutPaste )

Parâmetro	Tipo	Descrição
area	Inteiro longo	Área 4D Write
inicioSel	Inteiro longo	Início da palavra a devolver
fimSel	Inteiro longo	Fim da palavra a devolver
smartCutPaste	Inteiro	1 se o último caractere é um espaço, caso contrário 0

Descrição

O comando WR GET WORDS devolve a posição do primeiro caractere da primeira palavra da seleção e a posição do último caractere da última palavra da seleção. Também especifica se o último caractere da seleção é um espaço. Se nenhum texto está selecionado, inicioSel e fimSel devolvem o primeiro e último caractere da palavra na qual está o cursor.
Este comando não tem efeito na seleção atual.

Se a seleção começa no meio de uma palavra (ou entre o último caractere de uma palavra e o espaço que lhe segue), inicioSel devolverá a posição do primeiro caractere dessa palavra.

Se a seleção termina no meio de uma palavra, podem ser apresentados dois casos:

Se a palavra está seguida por espaço, fimSel incluirá o espaço e smartCutPaste devolverá 1.
Se a palavra não está seguida por um espaço, fimSel incluirá o último caractere da palavra e smartCutPaste devolverá 0.

Exemplo

O seguinte exemplo permite escanear o documento e recuperar a posição do primeiro e último caractere de cada palavra.

  `Localização do  cursor ao início da área

 WR SET SELECTION(area;0;0)

  `Contagem do número de palavras no documento

 nbWords:=WR Count(area;wr nb words)

  `Processamento das palavras uma por uma

 For($i;1;nbWords)

  `Recuperação da posição do primeiro e último caractere da palavra

    WR GET WORDS(area;beginning;pos)

  `Relocalização depois da última palavra processada

    WR SET SELECTION(area;Pos;Pos)

 End for