var I: Integer; S: string; A: TArray<string>;begin S := ‘AAA分割bbb分割ccc‘; A := S.Split([‘分割‘]); for I := 0 to High(A) do ShowMessage(A[I]);end;
输出结果为：
AAA
BBB
CCC
delphi 按照任意字符串分割语句
原文：http://www.cnblogs.com/h2zZhou/p/5338294.html
