Aprendiendo primer sample - Nefele 4 Harbour

Acceder Darse de alta He olvidado la contraseña

Etiquetado: Footers

Este debate tiene 7 respuestas, 2 mensajes y ha sido actualizado por última vez el 4 años, 2 meses por Alfredo Sanz. This post has been viewed 830 times

Mostrando 7 respuestas a los debates

Autor

Entradas

24-08-2020 a las 21:26 #461
Xevi
Participante
Estoy viendo y repasando el ejemplo que lleva NefeleWizard, y no veo donde se llama o crea el pie de página donde lleva dos barras de color "rosado" en la MainPage

Néfele Project
Hacer páginas web fácilmente con Néfele Project
© 2019-2020 Néfele Developer Group

Es como si se llamara a un Footer, pero no encuentro donde y como cambiar esos valores, colores...

Gracias por vuestro tiempo

Un Saludo,

Xevi
- Este debate fue modificado 4 años, 2 meses por Alfredo Sanz.
25-08-2020 a las 09:55 #463

Alfredo Sanz
Superadministrador

Hola,

Echa un vistazo a https://nefele.dev/wiki/controles/twebpage

Básicamente tienes 2 propiedades en Webpage

:lFooter: para decirle si mostrar o no el footer

- Si quieres un footer "personalizado"

usa cInFooter con el texto html que quieras

- Si quieres usar un footer standar

Tienes varias propiedades a utilizar: cTitleFooter, cClrFotText, etc...
31-08-2020 a las 20:34 #498
Xevi
Participante
Visto que disponemos de un Footer... una manera para incluir una Barra superior en la página sería con :cInHeader y seguro que más propiedades... O se tiene que montar con un WBevel???

Para poner logo, bienvenido, un menu desplegable de opciones...

Va a ser una barra, que se mostrará en casi todas las ventanas que se llamen sucesivamente.

Gracias por vuestro tiempo.

Un Saludo,

Xevi
- Esta respuesta fue modificada 4 años, 2 meses por Xevi.

31-08-2020 a las 22:45 #501

Alfredo Sanz

Superadministrador

Bueno, no exactamente 🙂

Tienes que usar el control WRebar ( https://nefele.dev/wiki/controles/wrebar ) junto con WSideNav

En unos días publicaremos un ejemplo completo, pero te dejo aquí la idea principal

PROCEDURE App_Menu( oParent, cUser )

   LOCAL oItem, aSub
   LOCAL aItems := { { "Inicio",,"App_Principal","home", xc_SideNavOption }, ;
      { "Departamentos",, "App_Departamentos", "card_travel", xc_SideNavOption }, ;
      { "Empleados",, "App_Empleados", "person", xc_SideNavOption }, ;
      { "Salir",,vSalir( oParent  ):Run() , "exit_to_app", xc_SideNavOption } }

   WITH OBJECT WSideNav():New( oParent )
      :cBackImage := "//" + GetEnv( "HTTP_HOST" ) + "/images/office.jpg"
      :cId        := "Menu"
      :cTitle     := "AppGestión Experimental"
      :cText      := "Aplicación de Gestión realizada con Néfele Project"
      :lShadow    := .T.
      :cAlignText := xc_Center

      FOR EACH aSub IN aItems

         WITH OBJECT :AddItem()
            :cText    := aSub[1]
            :cOnClick := aSub[3]
            :cIcon    := aSub[4]
            :nStyle   := aSub[5]
         END WITH

      NEXT

      :Create()

   END WITH

  WITH OBJECT  WRebar():New(oParent)
      :lBeforeMain :=.T.
      :lMenuNav    :=.T.
      :cTitle      := "AppGestión"
      :cLogo       := "/images/icon.png"
      :cTitleAlign := xc_Center
      :cLogoAlign  := xc_Left
      :cMenuAlign  := xc_Right
      :lBlock      := .T.

      :Create()

   END WITH

RETURN

PROCEDURE App_Menu( oParent, cUser )

LOCAL oItem, aSub

LOCAL aItems := { { "Inicio",,"App_Principal","home", xc_SideNavOption }, ;

{ "Departamentos",, "App_Departamentos", "card_travel", xc_SideNavOption }, ;

{ "Empleados",, "App_Empleados", "person", xc_SideNavOption }, ;

{ "Salir",,vSalir( oParent ):Run() , "exit_to_app", xc_SideNavOption } }

WITH OBJECT WSideNav():New( oParent )

:cBackImage := "//" + GetEnv( "HTTP_HOST" ) + "/images/office.jpg"

:cId := "Menu"

:cTitle := "AppGestión Experimental"

:cText := "Aplicación de Gestión realizada con Néfele Project"

:lShadow := .T.

:cAlignText := xc_Center

FOR EACH aSub IN aItems

WITH OBJECT :AddItem()

:cText := aSub[1]

:cOnClick := aSub[3]

:cIcon := aSub[4]

:nStyle := aSub[5]

END WITH

:Create()

END WITH

WITH OBJECT WRebar():New(oParent)

:lBeforeMain :=.T.

:lMenuNav :=.T.

:cTitle := "AppGestión"

:cLogo := "/images/icon.png"

:cTitleAlign := xc_Center

:cLogoAlign := xc_Left

:cMenuAlign := xc_Right

:lBlock := .T.

:Create()

END WITH

RETURN

Contenido no disponible.
Por favor, acepta las cookies haciendo clic en este aviso

Esta respuesta fue modificada 4 años, 2 meses por Alfredo Sanz.

31-08-2020 a las 23:33 #503

Xevi

Participante

Estaré a la expectativa del ejemplo completo que vayais a publicar.

De momento, voy intentando "aprender" y estudiando un poco como poder adentrarme en la programación web, de la mano de Néfele.

Veo que podemos "inyectar" código html directamente en el Header, Footer...

   With Object TWebPage():New()
*...
:cInHeader := '<img src="/images/@Soft.ico" />' +;
              '<b style="color:#1f1f92;margin-left: 2px;">COMAS Software </b>' +;
              '<button id="btnlogin" onclick="btnlogin_onclick()" style="position: absolute; right: 0; margin-top: 20px; margin-right: 10px;">Login</button>' +;
              "<script> function btnlogin_onclick( e = 'onclick') {return autoform({'FUNCTION':'Login','btnlogin': e},'','', false, null, null);}; </script>"

:cInFooter := '<b style="margin-left: 10px; color:rgba(0,0,0,0.87)">(c) 2020 COMAS Software, s.l. </b>'
*...

With Object TWebPage():New()

*...

:cInHeader := '<img src="/images/@Soft.ico" />' +;

'<b style="color:#1f1f92;margin-left: 2px;">COMAS Software </b>' +;

'<button id="btnlogin" onclick="btnlogin_onclick()" style="position: absolute; right: 0; margin-top: 20px; margin-right: 10px;">Login</button>' +;

"<script> function btnlogin_onclick( e = 'onclick') {return autoform({'FUNCTION':'Login','btnlogin': e},'','', false, null, null);}; </script>"

*...

Esto nos va a permitir libertad total en la confección de las páginas.

Un Saludo,

Xevi

01-09-2020 a las 10:25 #506

Alfredo Sanz
Superadministrador

Sí, realmente puedes inyectar el código html que quieras. Pero no lo hagas en cInHeader. cInHeader es parte de Materialize y lo usamos para incluir algunos elementos que si los eliminas con :cInHeader := "" te dará problemas. En todo caso :cInHeader += ""

La clase WebPage tiene un método llamado :AddHtml( <cTxt> ) que te permite inyectar código html dentro del <body> y puedes usarlo junto con los controles propios de Néfele
01-09-2020 a las 15:27 #507

Xevi
Participante

Fredy,

Gracias por la respuesta.

Lo que pretendo es (aprender) crearme una barra Header y una barra Footer. Para ir viendo y entendiendo código... asimilando lo que se me viene encima, jejeje.

con :AddHtml, como bien dices, inyecto codigo html en el <body>, cosa que no es lo que pretendo.

Voy a intentar crear una barra Header con un boton para abrir un form y desde ahí, capturar un par de datos para enviarlos a otro form y a ver que me voy encontrando.

Seguro que os voy a molestar más de lo que desearia, pero como toda novedad, uno anda a ciegas.

Gracias por vuestro tiempo

Un Saludo,

Xevi.
01-09-2020 a las 20:22 #520

Alfredo Sanz
Superadministrador

Desde luego, te puedes crear tus propios headers y footers, pero piensa que nefele ya tiene herramientas para hacerlo.

Revisa el ejemplo que hemos puesto en https://nefele.dev/foro/topic/ejemplo-de-formularios-con-nefele/ te va a venir de lujo

No te de apuro preguntar, piensa que vuestras preguntas nos ayudan mucho a mejorar Néfele.

Autor

Entradas

Mostrando 7 respuestas a los debates

Debes estar registrado para responder a este debate.