Este es el sitio web histórico de la documentación de 4D. La documentación se está trasladando progresivamente a developer.4d.com |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D v20 R7
WINDOW LIST
|
WINDOW LIST ( ventanas {; *} ) | ||||||||
Parámetro | Tipo | Descripción | ||||||
ventanas | Array |
![]() |
Array de los números de referencia de las ventanas | |||||
* | Operador |
![]() |
Si se especifica, tiene en cuenta las ventanas flotantes Si se omite, ignora las ventanas flotantes | |||||
El comando WINDOW LIST llena el array ventanas con los números de referencia de las ventanas abiertas actualmente en todos los procesos (procesos kernel o usuario). Sólo las ventanas "visibles" (ventanas no ocultas) se devuelven.
Si no pasa el parámetro opcional *, se ignoran las ventanas flotantes.
El siguiente método de proyecto coloca en mosaico todas las ventanas abiertas actualmente, excepto las ventanas flotantes y las cajas de diálogo:
` Método de proyecto TILE WINDOWS
WINDOW LIST($alWnd)
$vlLeft:=10
$vlTop:=80 ` Dejar espacio para la barra de herramientas
For($vlWnd;1;Size of array($alWnd))
If(Window kind($alWnd{$vlWnd})#Modal dialog)
GET WINDOW RECT($vlWL;$vlWT;$vlWR;$vlWB;$alWnd{$vlWnd})
$vlWR:=$vlLeft+($vlWR-$vlWL)
$vlWB:=$vlTop+($vlWB-$vlWT)
$vlWL:=$vlLeft
$vlWT:=$vlTop
SET WINDOW RECT($vlWL;$vlWT;$vlWR;$vlWB;$alWnd{$vlWnd})
$vlLeft:=$vlLeft+10
$vlTop:=$vlTop+25
End if
End for
Nota: este método puede mejorarse añadiendo pruebas del tamaño de la ventana principal (en Windows) o del tamaño y ubicación de las pantallas (en Macintosh).
Producto: 4D
Tema: Ventanas
Número
442
Creado por: 4D v6
Manual de lenguaje 4D ( 4D v20 R7)