enhanced TTextWriter.AddHtmlEscape() method to encode #1..#31 control chars