In TClass::EscapeChars avoid one past end of array write