>IF NOT This.SetUserAccess() > RETURN .F. >ENDIF > >IF EMPTY(This.InputMask) AND TYPE(This.ControlSource) == "C" > IF USED(JUSTSTEM(This.ControlSource)) > This.InputMask = REPLICATE("X", ; > FSIZE(JUSTEXT(This.ControlSource), JUSTSTEM(This.ControlSource))) > ENDIF >ENDIF > >IF TYPE("This.Parent.BackColor") <> "U" > This.DisabledBackColor = This.Parent.BackColor >ENDIF > >This.SaveOriginalText()a) Is Format empty ?
IF EMPTY(This.MaxLength) and USED(JUSTSTEM(This.ControlSource)) This.MaxLength = FSIZE(JUSTEXT(This.ControlSource), JUSTSTEM(This.ControlSource)) ENDIFc) but you begin with ?!