本文整理自网络,侵删。
以前一直是自已写函数处理,没想到Delphi有一个自带的。
ExtractStrings:用指定的分割符分割一个字符串为多个子字符串
给你一个例子
var
S: string;
SL: TStringList;
begin
S := '123,456,789 ';
SL := TStringList.Create;
ExtractStrings([ ', '], [], PChar(S), SL);
ShowMessage(SL.Text);
SL.Free;
end;
相关阅读 >>
Delphi中destroy, free, freeandnil, release用法和区别
Delphi 用 superobject 解析淘宝上的 json 数据
Delphi 跨平台的,在fmx中读取icon文件的每一帧到bitmap
更多相关阅读请进入《Delphi》频道 >>