Delphi 正则表达式之TPerlRegEx 类的属性与方法(7): Split 函数

最新推荐文章于 2022-11-29 16:31:07 发布

senfore

最新推荐文章于 2022-11-29 16:31:07 发布

阅读量424

点赞数

分类专栏： Delphi摘要文章标签：正则表达式 delphi list regex

Delphi摘要专栏收录该内容

43 篇文章 0 订阅

订阅专栏

//字符串分割: Split
var
  reg: TPerlRegEx;
  List: TStrings;
begin
  List := TStringList.Create;
  reg := TPerlRegEx.Create(nil);

  reg.Subject := 'aaa,bbb,ccc,ddd';
  reg.RegEx   := ','; {这里可是运行相当复杂的分割符啊}

  reg.Split(List,MaxInt); {第一个参数读入的是 Subject; 第二个参数是分成多少份}
  { 输入一个最大整数, 表示能分多少就分多少}

  ShowMessage(List.Text);
  {返回:
    aaa
    bbb
    ccc
    ddd
  }

  FreeAndNil(reg);
  List.Free;
end;