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;
 

相关阅读 >>

d10环境下调用hidcontroller1.0.35获取数据乱码问题

文件占坑对付云安全

Delphi applicationevents1 webbrowser1屏蔽右键菜单

Delphi xe8中的firemonkey应用程序将文本复制到剪贴板

Delphi 字符串常识

Delphi中生成控件的两种方法

Delphi启动/停止windows服务,启动类型修改为"自动"

Delphi高效的byte转化sring 函数

Delphi xe 启动关闭start page 页错误提示

Delphi 关于内存数据与 json

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

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