4D Doc Center : PV SELECT RANGE

4D View v14

PV SELECT RANGE


PV SELECT RANGE ( area ; izquierda ; superior ; derecha ; inferior ; accion )

Parámetro	Tipo	Descripción
area	Entero largo	Área 4D View
izquierda	Entero largo	Número de columna de la celda izquierda
superior	Entero largo	Número de línea de la celda de arriba
derecha	Entero largo	Número de la columna de la celda derecha
inferior	Entero largo	Número de línea de la celda inferior
accion	Entero	Acción de selección

Descripción

El comando PV SELECT RANGE selecciona el rango de celdas definidas por la izquierda, superior, derecha e inferior.

El parámetro accion permite definir la acción de selección a ejecutar cuando una selección de celdas ya existe: puede añadir el rango a la selección, reducir la selección al rango o eliminar el rango de la selección. accion se define utilizando las constantes PV Acciones de selección:

Constante	Tipo	Valor
pv selection add	Entero largo	1
pv selection reduce	Entero largo	2
pv selection set	Entero largo	0

Ejemplo 1

Queremos seleccionar el rango de las celdas E2, E3, F2, F3. La acción de selección depende del contexto (celdas ya seleccionadas):

  `Los arrays definen la selección actual:

 ARRAY LONGINT($Left;0) `Números de columna de la celda a la izquierda

 ARRAY LONGINT($Top;0) `Números de línea de la celda superior

 ARRAY LONGINT($Right;0) `Números de columna de la celda a la derecha

 ARRAY LONGINT($Bottom;0) `Número de línea de celda inferior

 PV GET SELECTED RANGES LIST(Area;$Left;$Top;$Right;$Bottom) `Obtener rangos seleccionados si los hay

 If(Size of array($Left)=0) `No hay selección actual

    PV SELECT RANGE(Area;5;2;6;3;pv selection set) `Definir el rango como selección actual

 Else

    PV SELECT RANGE(Area;5;2;6;3;pv selection add) `Añadir el rango a la selección actual

 End if

Ejemplo 2

Este ejemplo permite seleccionar o deseleccionar la celda en la cual el usuario efectúa Alt+clic (Windows) u Opción+clic (Mac OS), dependiendo de si pertenece o no a la selección.

  `Definición del rango de selección actual

 PV SELECT RANGE(area;1;5;2;9;pv selection set)

 

  `Llamada de un método cuando se hace clic en el área

 PV ON EVENT(area;pv on clicked;"ExampleView")

 

  `Método ExampleView

 C_LONGINT($1;$2;$3;$4;$5)

 If(($2=pv on clicked) & ($3=2048)) `Alt + clic u Opcion + clic

    If(PV Is cell selected(area;$4;$5)=1)

  `Si la celda es parte de la selección, se retira de la selección

       PV SELECT RANGE(area;$4;$5;$4;$5;pv selection reduce)

    Else

  `Si la celda no hace parte de la selecciónn, se añade a la selección

       PV SELECT RANGE(area;$4;$5;$4;$5;pv selection add)

    End if

 End if