¡Esta es una revisión vieja del documento!
Clase que gestiona los footers de las ventanas modales de Materialize
Es usado por el método AddFooter() de la clase wBevel
WITH OBJECT WBevel():New( :WO ) :cId := "ventanamodal" :nStyle := xc_Modal :lTrueModal := .T. WITH OBJECT WBevel():New( :WO ) :AddHTML("<CENTER>Néfele Project es una librería de clases<BR>con la que desarrollar..") :Create() END WITH WITH object :AddFooter() WITH object WButton():New( :WO ) :lContainer := .T. :cText = "Cerrar" :lModalClose := .T. :lFlat := .T. :Create() END WITH END WITH :Create() END WITH WITH OBJECT WButton():New( :WO ) :cText := "Abrir ventana modal" :cModalTarget := "ventanamodal" :lLarge := .T. :lCenter := .T. :Create() END
Comentarios wBevelFooter