Click y saber que está trabajando

Acceder Darse de alta He olvidado la contraseña

Topic Resolution: Resolved

Este debate tiene 6 respuestas, 2 mensajes y ha sido actualizado por última vez el 3 años, 6 meses por Xevi. This post has been viewed 493 times

Mostrando 6 respuestas a los debates

Autor

Entradas

22-10-2020 a las 13:17 #1353

Xevi
Participante

Otra cosa que suele suceder, es el que cuando hacemos click y procesamos datos o redirigimos a otra página, si estos procesos son largos o la página tarda en cargar, igual parece dar la sensación de que no hemos hecho clic y el usuario puede volver a dar click, y así puede entrar en procesos que se pueden demorar...

No se si hay alguna simple manera para poder decir a la página que cuando se esté en proceso de carga o en procesando datos, se muestre la ventana atenuada, inhabilitada y un gif por ejemplo de "espera"

Creo que lo vimos en algun sample, pero no logro encontrar.

Un Saludo,

Xevi.
23-10-2020 a las 00:13 #1358
Pedro Amaro
Superadministrador
Los controles que permiten Click tienen una propiedad lShadowSheet que si es .T. pondrá una cortinilla delante de la página para evitar que se pueda picar en ella, si quieres personalizar el mensaje que aparece tienes un par de propiedades en tWebPage

Puedes combinar lShadowSheet con lWaitOn para que ponga un circulito en movimiento de espera
- Esta respuesta fue modificada 3 años, 6 meses por Pedro Amaro.

23-10-2020 a las 09:35 #1367

Xevi

Participante

Pedro,

Este botón ejecuta un proceso que puede tardar unos segundos o incluso un minuto...

            WITH OBJECT WButton():New(:WO)
               :cId       := "submit"
               :cText     := "Acceptar"
               :lSubmit   := .T.
               :lLarge    := .T.
               :lCenter   := .T.
               :cIcon     := "keyboard_return"
               :cIconAlign := xc_Right
               :aWidth := {12}

*:lAjaxWaitON := .T.
:lShadowSheet := .T.
:cShadowSheetTitle := "Treballant"
:cShadowSheetSubTitle := "Esperi uns instants"

               :Create()
            END WITH

WITH OBJECT WButton():New(:WO)

:cId := "submit"

:cText := "Acceptar"

:lSubmit := .T.

:lLarge := .T.

:lCenter := .T.

:cIcon := "keyboard_return"

:cIconAlign := xc_Right

:aWidth := {12}

*:lAjaxWaitON := .T.

:lShadowSheet := .T.

:cShadowSheetTitle := "Treballant"

:cShadowSheetSubTitle := "Esperi uns instants"

:Create()

END WITH

Le he añadido esos parámetros, pero no me muestra nada, ni sombra, ni texto, nada.

También he probado sin comentar la línea AjaxWaitON := .T.

Un Saludo,

Xevi.

23-10-2020 a las 12:06 #1370

Pedro Amaro
Superadministrador

Por lo que veo en el código el botón es el submit de un wForm, en ese caso parece que efectivamente no hace caso al lShadowSheet. Seguramente habrá que asignárselo al wForm ya que el submit se ejecuta en el formulario no en el botón, déjanos que lo estudiemos porque el ShadowSheet lo consideramos como algo fundamental y debe funcionar también en un wForm.
23-10-2020 a las 12:28 #1379
Pedro Amaro
Superadministrador
Listo, estará incluido en la próxima versión de Néfele.
- Esta respuesta fue modificada 3 años, 6 meses por Pedro Amaro.
23-10-2020 a las 14:10 #1392

Xevi
Participante

Y, se podrà cambiar el color de fuente del título/subtítulo del shadow???

Cambiar la imágen del circulito por algun gif???

Un Saludo,

Xevi.

23-10-2020 a las 17:29 #1399

Xevi

Participante

Pedro,

He puesto lo referente al Shadow en el WForm

      WITH OBJECT WForm():New(:WO)
         :cFunction  := "Xls2Xml"
         :cAjaxBevel := "nflcargo"
         :aParams := { { "cFileXLS", cFileXLS },;
                      { "cFileNameXLS", cFileNameXLS} }
:lShadowSheet := .T.
:cShadowSheetTitle := "Treballant"
:cShadowSheetSubTitle := "Esperi uns instants"
:lAjaxWaitON := .T.

WITH OBJECT WForm():New(:WO)

:cFunction := "Xls2Xml"

:cAjaxBevel := "nflcargo"

:aParams := { { "cFileXLS", cFileXLS },;

{ "cFileNameXLS", cFileNameXLS} }

:lShadowSheet := .T.

:cShadowSheetTitle := "Treballant"

:cShadowSheetSubTitle := "Esperi uns instants"

:lAjaxWaitON := .T.

Y funciona correctamente.

Ahora bien, el circulito en movimiento se muestra SIEMPRE, esté lAjaxWaitON a .T. o a .F.

Un Saludo,

Xevi.

Autor

Entradas

Mostrando 6 respuestas a los debates

Debes estar registrado para responder a este debate.