Это блокирует только вставку более чем одной буквы, но в большинстве случаев работает:
<mx:TextInput textInput="if (event.text.length > 1) event.preventDefault()"/>
и для искры:
<s:TextInput
change="if (event.operation is PasteOperation)
(event.target as SkinnableTextBase).text = '' "
/>