修改了遇到的'Char'问题，可适用于Delphi2010。