add ControlMaskExtensions:

set Properties.CharacterCasing to Upper.

issue:
"SetAsIdentifier() for TextEdit" #518