Ejemplo wCards - Nefele 4 Harbour

Acceder Darse de alta He olvidado la contraseña

Etiquetado: wCards

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

Mostrando 6 respuestas a los debates

Autor

Entradas

15-10-2020 a las 14:59 #1227

Alfredo Sanz

Superadministrador

Os dejo otro ejemplo extraído del foro, en este caso aportación de Quim en https://nefele.dev/foro/topic/wcard-ejemplo-de-uso/

#include "Xailer.ch"
#include "Nefele.ch"

PROCEDURE Cards
LOCAL n, nLen
LOCAL aModel

   WITH OBJECT TWebPage():New()

      // Modelo de datos
      aModel := {;
         {"3420", "1.png", "Pijama homewear"}, ;
         {"4653", "2.png", "Pijama corazones"}, ;
         {"7689", "3.png", "Baby escolar"}, ;
         {"1234", "4.png", "Camisola verano"}, ;
         {"5323", "5.png", "Pijama caballero"}, ;
         {"7260", "6.png", "Camisa sportwear"} ;
         }

      nLen := Len(aModel)

      FOR n:=1 TO nLen

         WITH OBJECT WCard():New( :WO )
            :cId            := "m"+ aModel[n,1]
            :cTitle         := aModel[n,1]
            :nTitleFontSize := 4
            :cText          := aModel[n,3]
            :nHeightText    := 50
            :cImage         := "https://samples.nefele.dev/images/articulos/"+ aModel[n,2]
            :aLinks         := {}
            :aWidth[xc_S]   := 4
            :lHorizontal    := .F.
            :Create()
         END WITH

      NEXT

      oCgi:SendPage( :Create() )
   END WITH

RETURN

#include "Xailer.ch"

#include "Nefele.ch"

PROCEDURE Cards

LOCAL n, nLen

LOCAL aModel

WITH OBJECT TWebPage():New()

// Modelo de datos

aModel := {;

{"3420", "1.png", "Pijama homewear"}, ;

{"4653", "2.png", "Pijama corazones"}, ;

{"7689", "3.png", "Baby escolar"}, ;

{"1234", "4.png", "Camisola verano"}, ;

{"5323", "5.png", "Pijama caballero"}, ;

{"7260", "6.png", "Camisa sportwear"} ;

}

nLen := Len(aModel)

FOR n:=1 TO nLen

WITH OBJECT WCard():New( :WO )

:cId := "m"+ aModel[n,1]

:cTitle := aModel[n,1]

:nTitleFontSize := 4

:cText := aModel[n,3]

:nHeightText := 50

:cImage := "https://samples.nefele.dev/images/articulos/"+ aModel[n,2]

:aLinks := {}

:aWidth[xc_S] := 4

:lHorizontal := .F.

:Create()

END WITH

oCgi:SendPage( :Create() )

END WITH

RETURN

y el ejemplo funcionando

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

Este debate fue modificado 3 años, 6 meses por Alfredo Sanz.
Este debate fue modificado 3 años, 6 meses por Alfredo Sanz.

20-10-2020 a las 01:36 #1322

Gabriel Ornelas
Participante

Estoy leyendo que se pueden aplicar temas a las Cards.. Nefele ya lo tiene implementado ?
20-10-2020 a las 10:36 #1325

Alfredo Sanz
Superadministrador

Gabriel, no sé muy bien a qué te refieres.

Si me pasas el enlace donde has visto lo de los temas para las Cards ño miro y te digo

10-11-2020 a las 05:29 #1529

juan.novedades

Participante

Hola Alfredo buenas noches tengo una duda con el ejemplo si cambiamos la linea 11 con lo siguiente:

      aModel := { ;
         { "3420", "1.png", "Pijama homewear sdf sdf sdf sdfsdf sdfs df" }, ;
         { "4653", "2.png", "Pijama corazones sdf sdf sdfsdfsdfs" }, ;
         { "7689", "3.png", "Baby escolar" }, ;
         { "1234", "4.png", "Camisola verano" }, ;
         { "5323", "5.png", "Pijama caballero" }, ;
         { "7260", "6.png", "Camisa sportwear" } ;
         }

aModel := { ;

{ "3420", "1.png", "Pijama homewear sdf sdf sdf sdfsdf sdfs df" }, ;

{ "4653", "2.png", "Pijama corazones sdf sdf sdfsdfsdfs" }, ;

{ "7689", "3.png", "Baby escolar" }, ;

{ "1234", "4.png", "Camisola verano" }, ;

{ "5323", "5.png", "Pijama caballero" }, ;

{ "7260", "6.png", "Camisa sportwear" } ;

}

cambia la altura de las cards y provoca que se haga un espacio en blanco entre la tercera y la cuarda, hay una manera de obligar la misma altura para todas?

Saludos Cordiales.

10-11-2020 a las 12:48 #1530

Alfredo Sanz
Superadministrador

Hola Juan,

Cuando creas el card le puedes poner un

:oStyle:cHeight = "400px"

Para que te agrande la altura de los card y te amplíe el espacio para el texto. Eso sí, ten encuenta que la altura ha de ser la misma para todos.
10-11-2020 a las 21:58 #1534

juan.novedades
Participante

Genial Alfredo, funciono muy bien, lo puse asi: :oStyle:cHeight = "520px" y ya se muestran sin espacios pero ahora el detalle es con los botones se muestran a "alturas" diferentes, pense que quizas si uniformara el ancho de la descripción de los productos se resolviera pero de alguna manera u otra html lo recorta y termina siempre poniendo lo mismo. Alguna sugerencia para ello ? Saludos Cordiales y aprovecho para decir que esta es una herramienta que da mucha satisfaccion.
14-11-2020 a las 21:17 #1543

Alfredo Sanz
Superadministrador

Tendría que ver el ejemplo funcionando para poder decirte.

Si lo tienes en internet dime la url para poder echarle un vistazo

Autor

Entradas

Mostrando 6 respuestas a los debates

Debes estar registrado para responder a este debate.