关于ExtractStrings函数
在帮助文档里就那么干巴巴的几句话,也没有一个例子,那位高手能给个例子?到底是如何分割的? 问题点数:20、回复次数:2Top
1 楼h98458(零点起飞)回复于 2005-06-01 14:21:22 得分 10
function ExtractStrings(Separators, WhiteSpace: TSysCharSet; Content: PChar; Strings: TStrings): Integer;
Separators是分割符号的集合,而WhiteSpace是表示空格的集合。该函数按照分割符号分割字符串。
ExtractStrings(['$'], [' '], '1234$abcd$xyz', memo1.Lines);
另外,再提供一个例子:
ExtractStrings([DateSeparator], [' '], PChar(DateToStr(Now)), memo1.Lines);
Top
2 楼xpdavis(咕嘟-不想孤独)回复于 2005-06-01 14:25:42 得分 10
ExtractStrings(TSysCharSet() << ':' << ';', TSysCharSet() << '\t' << ' ', "abcdefg: 0123456789:hijklmn;\topqrst:uvwxyz", ListBox1->Items);
Top




