分割字符串函数ExtractStrings

xj82257695

于 2011-08-21 18:21:13 发布

阅读量527

点赞数 1

分类专栏： Delphi 文章标签： list string

Delphi 专栏收录该内容

7 篇文章

订阅专栏

本文介绍了一种使用Delphi进行字符串分割的方法，通过示例代码展示了如何利用ExtractStrings函数高效地处理包含多种分隔符的字符串，并展示了具体的实现步骤。

//分割字符串ExtractStrings
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;
end;