versión 11.2
WA Create URL history menu ({*; }objeto{; direccion}) MenuRef
Parámetro | Tipo | Descripción | |
* | * | Si se especifica, objeto es un nombre de objeto (cadena) | |
Si se omite, objeto es una variable | |||
objeto | Objeto de form. | Nombre de objeto (si se especifica *) o | |
Variable (si se omite *) | |||
direccion | Entero | 0 ó si se omite=Lista de los URLs anteriores, | |
1=Lista de los URLs siguientes | |||
Resultado | MenuRef | Referencia de menú |
Descripción
El comando WA Create URL history menu crea y llena un menú que puede ser utilizado directamente para la navegación entre los URLs visitados durante la sesión en el área Web designada por los parámetros * y objeto. Puede utilizarse para crear una interfaz de navegación personalizada.
La información proporcionada concierne a la sesión; en otras palabras, la navegación se lleva a cabo en la misma área Web siempre y cuando el formulario no se haya cerrado.
Pase en direccion un valor que indique la lista a recuperar. Puede utilizar una de las siguientes constantes, ubicadas en el tema "Web Area":
Constante | Tipo | Valor |
wa previous URLs | Entero largo | 0 |
wa next URLs | Entero largo | 1 |
Si omite el parámetro direccion, se utiliza el valor 0.
Una vez generado el menú, puede mostrarlo vía el comando de 4D Dynamic pop up menu y puede trabajar con él utilizando los comandos estándar de gestión de menús de 4D. La referencia ItemRef (tipo cadena) devuelta por el comando Dynamic pop up menu contiene el URL de la página visitada (ver ejemplo).
Llame el comando RELEASE MENU para borrar un menú de historial del URL cuando ya no sea útil.
Ejemplo
El siguiente código puede estar asociado con un botón 3D con menú pop up llamado "Anterior":
Case of `Clic simple : (Form event=On clicked) WA OPEN BACK URL (WA_area) `Clic en la flecha -> mostrar pop up : (Form event=On Arrow Click) `Crear un menú de historial previo $Menu:=WA Create URL history menu (WA_area;wa previous URLs) `Mostrar este menú en un pop-up $URL:=Dynamic pop up menu ($Menu) `Si un elemento está seleccionado If ($URL#"") `Abrir la página Web WA OPEN URL(WA_area;$URL) End if `Borrar el menú para liberar la memoria RELEASE MENU($Menu) End case
Ver también
Dynamic pop up menu, RELEASE MENU, WA GET URL HISTORY.