根据分隔符将一个长字符串分割保存到动态数组中(第二种方法)

来源:互联网 发布:淘宝中老年男士羽绒服 编辑:程序博客网 时间:2022/01/24 05:08
var  s: String;  List: TStringList;begin  s := 'about: #delphi; #pascal, programming';  List := TStringList.Create;  ExtractStrings([';',',',':'],['#',' '],PChar(s),List);  //第一个参数是分隔符; 第二个参数是开头被忽略的字符  ShowMessage(List.Text);  //about                           //delphi                           //pascal                           //programming  List.Free;


摘自万一的博客

http://www.cnblogs.com/del/archive/2007/12/11/991479.html