Delphi 分割字符串 ExtractStrings


本文整理自网络,侵删。

 
//分割字符串 ExtractStrings
var
  s: String;
  List: TStringList;
begin
  s := 'about: #delphi; #pascal, programming';
  List := TStringList.Create;
  ExtractStrings([';',',',':'],['#',' '],PChar(s),List);
  //第一个参数是分隔符; 第二个参数是开头被忽略的字符

  ShowMessage(List.Text);  //about
                           //delphi
                           //pascal
                           //programming
  List.Free;
end;

相关阅读 >>

Delphi 提升权限查找进程关闭进程单元

Delphi新建服务,停止系统服务,以及获取服务状态和新建系统服务器的方法

Delphi的rtti实现对象的xml持久化

在一个exe文件中查找指定内容,找到则返回起始位置,否则返回0

Delphi 10.2 ide界面

Delphi java 日期 转换 获取unix时间戳

Delphi分享pos函数。(比fastpos还要快)

Delphi 获取进程列表及相关信息

Delphi for android 获取手机号

Delphi中实现变长函数笔记

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...