CLASS WItemSideNav FROM WNefeleComponent

   PROPERTY cClassId    INIT "isnv"
   PROPERTY cText       INIT "" WRITE INLINE ::FcText := ::AdjustText( Value )
   PROPERTY cOnClick    INIT ""
   PROPERTY cAction     INIT ""  // Para utilizar hRef en vez del evento OnClick

   PROPERTY oIcon       AS WIcon  // Icono a la derecha del texto
   PROPERTY cIcon       INIT "" WRITE INLINE ::oIcon:cIcon :=  Value READ INLINE ::oIcon:cIcon   // Icono del botón
   // Vamos a mantener provisionalmente las propiedades directas de los iconos pero van ha desaparecer

   PROPERTY nStyle      INIT xc_SideNavOption  // Estilo xc_SubHeader, xc_Divider
   PROPERTY aParams     INIT {}           // Parámetros extras a incluir en la lamada al CGI
   PROPERTY oBadge      AS WBadge           // texto,color fondo

   PROPERTY cTarget     INIT "_New"           //  Pestaña de destino si el destino es una url

   PROPERTY cClrPane    INIT "" WRITE INLINE ::FcClrPane := ::CheckClr(Value)
   PROPERTY cClrText    INIT "" WRITE INLINE ::FcClrText := ::CheckClr(Value)

   METHOD Create(oParent)
   METHOD New( oParent )

ENDCLASS