Json单元文件，譔单元中有很多有用的涵数。

该单元是delphi里要用的正则表达式，可以学习中试用。