最近在使用Delphi开发一种应用系统的集成开发环境.其中需要实现一个字符串拆分功能,方法基本原型应该是:procedure SplitString(src: string ; ch: Char; var stringList: TStringList);目的是使用字符ch拆分src字符串,把拆分的结果放入stringList中.例如:src:='abc|def|ghi'; ch='|'的时候,返回的stringList应该是{abc, def, ghi}.开始的时候,我是使用获取ch在src中