时间：2011/9/3 15:36:09 点击：

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

写个例子吧：
比如
ABC|...   DEF|#### GHI|"不会被分开|# www.52delphi.com"
要得到
ABC
DEF
GHI
不会被分开|# www.52delphi.com
四个子串可以用下面的代码：

uses
Classes;
var
ASource: PChar;
AStr: String;
ACount: Integer;
AStrings: TStringList;
begin
ASource := 'ABC|...   DEF|#### GHI|"不会被分开|# www.52delphi.com"';
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.

・ 如何将一个字符串映射为一个Delphi控件属性名

・ IdTcpClient的WriteBuffer如何发送大于255字符？

・ Delphi写StringGrid导出到Excel转换函数

・ Variant的相关函数

・ 关于跨进程使用回调函数的研究,以跨进程获取Richedit中RTF流为例

・ 一个将HTML代码转换成IHTMLDocument2接口的函数

・ BCB/Delphi中常用的VCL函数说明

・ Delphi中使用汇编(关于POS函数的问题)

・ Delphi与汇编学习4(两个转16进制的函数)

・ 计算出用字符串表示的数学表达式的值

・ Delphi检测对象有方法时是否为纯虚函数

・ Delphi中的静态虚拟及动态方法函数的区别

・ Delphi如何将byte型的数组转换为字符串

・ Delphi字符串、PChar与字符数组之间的转换

・ Delphi无限位四则运算的几个函数

・ Delphi中Format字符串说明

・ Delphi字符串转换成16进制ASM代码

・ Delphi过程函数传递参数的几种方式

・ Delphi中字符串隐藏写法

06-12 ・ 关于delphi的utf8 字符串string转换问题

09-03 ・ Delphi中多线程分析详解

09-28 ・ 关于Delphi XE2的FMX的一点点研究之消息篇

09-03 ・ Delphi开发的免费的自动升级(更新)程序

09-06 ・ 解决 Delphi XE (2010，2009) 里的UTF8乱码问题！

09-03 ・ Delphi会经常出现Access violations这样的内存访问错误

09-03 ・ Delphi中JSon SuperObject类库使用

09-03 ・ Delphi中多线程安全和并发问题

09-03 ・ Delphi获取真正随机数的代码

09-03 ・ Delphi线程池代码实例