Delphi分割字符串的函数ExtractStrings

最新推荐文章于 2024-05-15 08:55:58 发布

转载最新推荐文章于 2024-05-15 08:55:58 发布 · 2.3k 阅读

文章标签：

#delphi #whitespace #processing #integer #string

DELPHI 专栏收录该内容

74 篇文章

订阅专栏

本文介绍Delphi中的ExtractStrings函数，该函数能有效分割字符串并去除空串和空白字符。通过设置分割符和空白字符参数，可以灵活控制分割行为。文章包含了一个具体的使用示例。

Delphi分割字符串的函数ExtractStrings，分割的同时还可以去空字符串和去空白（可以自定义）．
Separators 参数指定一组分割符，所有的子串都是用它们分割的。但是成对的引号内的分割符会被忽略（参看下面的例子）。
WhiteSpace 参数指定每个子串开头被忽略的字符s。
Content 参数就是被分割的“源”串了。
Strings 参数用于接收分割后的各个子串。它的原有内容不会被清空。别忘了Create哦。
另外，EctractStrings不会把（忽略WhiteSpaces后的）空串加入到Strings中。

uses
Classes;
var
ASource: PChar;
AStr: String;
ACount: Integer;
AStrings: TStringList;
begin
ASource := ''ABC|... DEF|#### GHI|"不会被分开|#;
AStrings := TStringList.Create;
try
    ACount := ExtractStrings([''|''], ['' '', ''#'', ''.''], ASource, AStrings);
    {do any further processing}
    /for AStr in AStrings do
    // Writeln(AStr);
finally
    AStrings.Free;
end;

Readln;
end.