HABILITABARRADESPLAZAMIENTOnombrehabilitarSCROLLBARENABLEnombrehabilitar
Habilita o deshabilita la barra de desplazamiento identificada por nombre.
Si el argumento habilitar iguala a CIERTO, entonces se habilita la barra de desplazamiento.
Si el argumento habilitar iguala a FALSO, entonces se deshabilita la barra de desplazamiento.
Cuando una barra de desplazamiento está deshabilitada, la posición del deslizador está oculta. Si quieres que el usuario pueda ver la posición del deslizador pero no ser capaz de cambiarla, entonces usa una barra de desplazamiento habilitada y haz que la retrollamada reponga el valor correcto a la posición de la barra de desplazamiento. Este patrón se lo muestra en el segundo ejemplo abajo.
Deshabilitar una barra de desplazamiento:
CREAVENTANA "raíz "miventana "Ejemplo 0 0 100 100 [] CREABARRADESPLAZAMIENTO "miventana "mibarra 25 25 50 0 [] HABILITABARRADESPLAZAMIENTO "mibarra "FALSOAhora, la barra de desplazamiento está deshabilitadaHABILITABARRADESPLAZAMIENTO "mibarra "CIERTOAhora, la barra de desplazamiento está habilitada de nuevoBORRAVENTANA "miventana
Crear una barra de desplazamiento de solo lectura:
PARA BARRARETROLLAMADA ; Cuando el usuario cambie la posición de la barra de ; desplazamiento, ponerla el valor correcto, que se ; almacena en :ValorDeBarraDeDesplazamiento ; ; Para evitar un bucle infinito, solo cambia el valor ; si está diferente de lo que pondremos. SI NOIGUALES? :ValorDeBarraDeDesplazamiento LEEBARRADESPLAZAMIENTO "mibarra [ PONBARRADESPLAZAMIENTO "mibarra 0 360 :ValorDeBarraDeDesplazamiento ] FIN PARA ACTUALIZARBARRADEDESPLAZAMIENTO :ValorNuevo ; Ejecuta esto cuando quieres actualizar el valor. HAZ "ValorDeBarraDeDesplazamiento :ValorNuevo BARRARETROLLAMADA FIN ; Crea una ventana con una barra de desplazamiento de solo lectura. CREAVENTANA "raíz "miventana [Ejemplo barra de desplazamiento de solo lectura] 0 0 100 30 [] CREABARRADESPLAZAMIENTO "miventana "mibarra 5 5 90 0 [ BARRARETROLLAMADA ] ; Pon el valor inicial. ACTUALIZARBARRADEDESPLAZAMIENTO 50Intenta cambiar la posición de la barra de desplazamiento con el ratón. Ve como regrese al valor que puso ACTUALIZARBARRADEDESPLAZAMIENTO en BARRARETROLLAMADA.; Cambia el valor programáticamente. ACTUALIZARBARRADEDESPLAZAMIENTO 50 ; Borra la ventana cuando hayas terminado. BORRAVENTANA "miventana