¡Esta es una revisión vieja del documento!
CLASS WMsgAlert FROM WControl // Estudiar con https://sweetalert2.github.io/ PROPERTY cClassId INIT "mga" PROPERTY cTitle INIT '' WRITE INLINE ::FcTitle := ::AdjustText( Value ) PROPERTY cText INIT '' WRITE INLINE ::FcText := ::AdjustText( Value ) //Texto a mostrar PROPERTY lTagScript INIT .F. //Tiene que encerrar la salida en tag <script> PROPERTY lCssMaterialize INIT .T. //Usamos estilo materialice PROPERTY cConfirmButton INIT "Aceptar" //Texto del botón PROPERTY lShowConfirmButton INIT .T. //Muestra botón aceptar PROPERTY lToast INIT .F. //emula un toast PROPERTY cConfirmButtonColor INIT '' WRITE INLINE ::FcConfirmButtonColor := nfl_ReplaceClrMaterialize( Value, 2 ) //ojo que el ver sera el del css PROPERTY cConfirmButtonIcon INIT '' //ojo que el ver sera el del css PROPERTY lModal INIT .f. //Tratamiento modal PROPERTY nOpenSeconds INIT 0 // Temporizador para mostrar el alert pasados nOpenSeconds segundos PROPERTY cBackGroundColor WRITE INLINE ::FcBackGroundColor := nfl_ReplaceClrMaterialize( Value, 2 ) //color de fondo PROPERTY nPrimaryDelay //Ms de espera para que desaparezca solo PROPERTY cType //Icono superior: warning, error, success, info, and question PROPERTY cPosition //xc_Top, xc_Center, xc_Bottom, xc_TopLeft, xc_TopRight, xc_CenterLeft, xc_CenterRight, xc_BottomLeft, xc_BottomRight PROPERTY cImageUrl INIT "" PROPERTY cInputType INIT "" PROPERTY cInputValue INIT "" //PROPERTY aScript INIT {} PROPERTY cCancelButtonColor INIT '' WRITE INLINE ::FcCancelButtonColor := nfl_ReplaceClrMaterialize( Value, 2 ) PROPERTY cCancelButtonIcon INIT '' PROPERTY cCancelButton // Texto del botón PROPERTY cOnConfirm INIT "" // Acción al pulsar confirm button PROPERTY cOnCancel INIT "" // Acción al pulsar cancel button PROPERTY oWebPage // Realmente es ::oParent. quitar METHOD CreateConfirm() // Crea el onclick de confirmacion METHOD CreateCancel() // Crea el onclick de cancelacion METHOD OnClickFunction() // Crea las funciones javascript METHOD Icon( cIcon, cPos ) // Añade el icono al texto METHOD Create() METHOD Run( aParams ) // Devuelve el codigo necesario para poder usar la alerta en un boton // aParams será el contenido de los parámetros definidos en ::aNomParams {"clientes", 25} (revisar) PROPERTY cNomParams INIT "" // Nombres de las variables que se asignarán a los Parámetros a incluir "Tabla,Codigo" PROPERTY cBackDrop INIT "" PROPERTY jsConfirmOnClick INIT "" PROPERTY jsCancelOnClick INIT "" ENDCLASS