Delphi xe 分割字符串太方便了

本文整理自网络，侵删。

 
procedure TForm1.Button2Click(Sender: TObject);
var
  m_Str: string;
  m_StrList: TArray<string>;
  I:Integer;
begin
  m_Str := Memo1.Text;
  m_StrList := m_Str.Split(['n你好', '啊&']);
  for I := 0 to High(m_StrList) do
  begin
    Memo1.Lines.Add(m_StrList[I]);
  end;
end;

https://www.cnblogs.com/GodPan/p/4535718.html
 

相关阅读 >>

Delphi 使用tarray.sort对数组排序

Delphi listview 导出excel txt vcf 单元

Delphi 获取指定当前目录下指定文件扩展名所有文件

Delphi 62进制转10进制

Delphi fmx 同时使用longtap和tap

Delphi windowsapi: muldiv

Delphi xe7 新的并行库 system.threading

idtcpclient和idtcpclient 主要属性和方法

Delphi �c 使用createoleobject后释放olevariant

Delphi tnethttpclient https忽略证书验证

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi xe 分割字符串太方便了