Thursday, December 4, 2008

Autoselect an Editmask

[ItemFocusChanged event]
CHOOSE CASE this.Describe(dwo.name + '.editmask.mask')
CASE '?' , '!'
CASE ELSE
this.SelectText(1,999)
END CHOOSE
END IF
RETURN 0

No comments:

Custom Search