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 判断字符是否是数字

Delphi7 写过卡巴主动防御服务端

Delphi 获取分解时间日期的年月日

Delphi 把单张图片保存到access数据库

Delphi 自带单元字符md5加密

Delphi中的进制转换

Delphi 将word嵌入Delphi中

在Delphi程序中使用自定义的鼠标

Delphi xe5 android 发短信以及目录

Delphi模仿“千千静听”滚动标题栏，非常简单！

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

转载请注明出处：木庄网络博客 » Delphi 分割字符串 ExtractStrings