分割字符串 ExtractStrings

最新推荐文章于 2023-10-28 13:53:15 发布

my98800

最新推荐文章于 2023-10-28 13:53:15 发布

阅读量1k

点赞数

分类专栏： Delphi

Delphi 专栏收录该内容

192 篇文章

订阅专栏

本文介绍了一种使用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;