CLASS WToast FROM WControl

   PROPERTY cClassId    INIT "toa"
   PROPERTY cButtonText INIT "" WRITE INLINE ::FcButtonText := ::AdjustText( Value )
                                          // Texto del Button
   PROPERTY cText       INIT "" WRITE INLINE ::FcText := ::AdjustText( Value )
                                          // Texto
   PROPERTY cType       INIT xc_Btn       // xc_Btn=Crea un button para abrir el Toast     xc_Auto=se autoejecuta
   PROPERTY lTitleItem  INIT .F.
   PROPERTY nStyle      INIT xc_NoStyle  // Tambien admite xc_Round
   PROPERTY nTime       INIT 5000        // Tiempo que esta el Toast Visible en ms
   PROPERTY nTimeInput  INIT 400         // Tiempo de la animación de apertura en ms
   PROPERTY nTimeOutput INIT 400         // Tiempo de la animación de Cierre en ms


   METHOD Create()

ENDCLASS