查找指定字符在一段文本中Delphi代码..rar