Delphi判断字符串中是否包含汉字，并返回汉字位置