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 sql语句查询最新的各个台位的最后一个检测值

Delphi 串口控制继电器

Delphi 正则表达式的匹配模式

Delphi fdmemtable内存表操作

Delphi 与 graphics gdi+ 基础学习

Delphi 如何使用 ppchar

Delphi跨平台的字符串代码标准

Delphi 三种方式读取txt文本文件

Delphi 将tbitmap与tgpimage转换

Delphi datasnap清除僵死连接

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

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