4D Write v16

WR GET WORDS

Inicio

 
4D Write v16
WR GET WORDS

WR GET WORDS 


 

WR GET WORDS ( area ; inicioSel ; finSel ; smartCutPaste ) 
Parámetro Tipo   Descripción
area  Entero largo in Área 4D Write
inicioSel  Entero largo in Inicio de la palabra a devolver
finSel  Entero largo in Fin de la palabra a devolver
smartCutPaste  Entero in 1 si el último carácter es un espacio, de lo contrario 0

El comando WR GET WORDS devuelve la posición del primer carácter de la primera palabra de la selección y la posición del último caracter de la última palabra de la selección. También especifica si el último carácter de la selección es un espacio. Si ningún texto está seleccionado, inicioSel y finSel devuelven el primer y último carácter de la palabra en la cual está el cursor.
Este comando no tiene efecto en la selección actual.

Si la selección comienza en el medio de una palabra (o entre el último carácter de una palabra y el espacio que le sigue), inicioSel devolverá la posición del primer carácter de esa palabra.

Si la selección termina en el medio de una palabra, se pueden presentar dos casos:

  • Si la palabra está seguida por espacio, finSel incluirá el espacio y smartCutPaste devolverá 1.
  • Si la palabra no está seguida por un espacio, finSel incluirá el último carácter de la palabra y smartCutPaste devolverá 0.

Ejemplo  

El siguiente ejemplo permite escanear el documento y recuperar la posición del primer y último carácter de cada palabra.

  `Ubicación del  cursor al inicio del área
 WR SET SELECTION(area;0;0)
  `Conteo del número de palabras en el documento
 nbWords:=WR Count(area;wr nb words)
  `Procesamiento de las palabras una por una
 For($i;1;nbWords)
  `Recuperación de la posición del primer y último carácter de la palabra
    WR GET WORDS(area;beginning;pos)
  `Reubicación luego de la última palabra procesada
    WR SET SELECTION(area;Pos;Pos)
 End for

 
PROPIEDADES 

Producto: 4D Write
Tema: WR Gestión de texto
Número 89465

 
HISTORIA 

Creado por: 4D Write 6.5

 
ARTICLE USAGE

4D Write - Lenguaje ( 4D Write v16)