CLASS ZRange FROM WControl

   PROPERTY cClassId    INIT "rng"

   PROPERTY cAlign      INIT xc_NoAlign  // Alineación

   Property nMinValue   Init 0           // Valor minimo
   Property nMaxValue   Init 100         // Valor Máximo
   PROPERTY cClrTitle   INIT "black"     WRITE INLINE ::FcClrTitle := ::CheckClr(Value)

   METHOD Create()

ENDCLASS