wCard ejemplo de uso - Nefele 4 Harbour

Acceder Darse de alta He olvidado la contraseña

Topic Resolution: Resolved

Este debate tiene 1 respuesta, 2 mensajes y ha sido actualizado por última vez el 3 años, 7 meses por quim. This post has been viewed 576 times

Mostrando 1 respuesta al debate

Autor

Entradas

22-09-2020 a las 03:00 #740

Gabriel Ornelas
Participante

Hola, algún ejemplo con wCard, en el wiki aun no tiene información 🙁

22-09-2020 a las 08:18 #742

quim

Participante

Buenos dias

Aquí tienes uno que uso ...


local n, nLen
local aModel

// Modelo de datos
aModel := {;
{"3420", "m1.jpg", "Pijama homewear"}, ;
{"4653", "m2.jpg", "Pijama corazones"}, ;
{"7689", "m3.jpg", "Baby escolar"}, ;
{"1234", "m4.jpg", "Camisola verano"}, ;
{"5323", "m5.jpg", "Pijama caballero"}, ;
{"7260", "m6.jpg", "Camisa sportwear"} ;
}

nLen := Len(aModel)
for n:=1 to nLen

With Object WCard():New( oParent )
:cId := "m"+ aModel[n,1]
:cTitle := aModel[n,1]
:nTitleFontSize := 4
:cText := aModel[n,3]
:nHeightText := 50
:cImage := "images/quim/img/"+ aModel[n,2]
:aLinks := {}
:aWidth[xc_S] := 4
:lHorizontal := .F.
:oStyle:cHeight := "300px"
:Create()
End With
next

local n, nLen

local aModel

// Modelo de datos

aModel := {;

{"3420", "m1.jpg", "Pijama homewear"}, ;

{"4653", "m2.jpg", "Pijama corazones"}, ;

{"7689", "m3.jpg", "Baby escolar"}, ;

{"1234", "m4.jpg", "Camisola verano"}, ;

{"5323", "m5.jpg", "Pijama caballero"}, ;

{"7260", "m6.jpg", "Camisa sportwear"} ;

}

nLen := Len(aModel)

for n:=1 to nLen

With Object WCard():New( oParent )

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

:cTitle := aModel[n,1]

:nTitleFontSize := 4

:cText := aModel[n,3]

:nHeightText := 50

:cImage := "images/quim/img/"+ aModel[n,2]

:aLinks := {}

:aWidth[xc_S] := 4

:lHorizontal := .F.

:oStyle:cHeight := "300px"

:Create()

End With

Saludos

Autor

Entradas

Mostrando 1 respuesta al debate

Debes estar registrado para responder a este debate.