Delphi TStringList 自带 split 用法

本文整理自网络，侵删。

 
procedure TForm1.Button4Click(Sender: TObject);
var

  split: TStringList;
begin
    split := TStringList.Create;
    split.Delimiter := '-';
    split.DelimitedText := '123-456-789';
    Caption:= split[0]+split[1]+split[2];
    split.free;
end;
 

相关阅读 >>

Delphi的ttreeview类使用大全

Delphi dbgrid刷新数据

Delphi tstringlist 排序 customsort

Delphi 获取指定年月的周、日数 -weeksinayear、weeksinyear、daysinayear、daysinamonth、daysinyear、daysinmonth

Delphi xe 泛型数组和splitstring处理数据

Delphi研究之驱动开发篇（五）--使用后备列表

Delphi tmsweb core webhttprequest1提交json数据

Delphi键盘按键伪码多类型

Delphi 打开资源管理器并定位到指定目录下的文件

Delphi ioutils单元查找文件夹下所有文件

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

转载请注明出处：木庄网络博客 » Delphi TStringList 自带 split 用法