>>* Input mask
>>IF TYPE(This.ControlSource)='C'
>> This.Inputmask=REPLICATE('X',LEN(EVALUATE(This.ControlSource)))
>>ENDIF
>
>I didn't test it right now, but it seems unuseful to me. "X" means any char and the length is automatically the length of the field (variable).

Please disregard my previous message. I was wrong.

Vlad