RSS订阅 | 匿名投稿
您的位置:网站首页 > 字符串 > 正文

Delphi下的字符串分隔函数的一种用法

作者:admin 来源: 日期:2015/2/8 21:27:08 人气: 标签:


如果你用XE3以上版本的Delphi,可以用下面的方式来分隔两个标签中的字符串。QString同时提供了一个类似的函数叫做StrBetweenW,但不同的是只取首个标签内的内容。

var
  var_sText1: string;
  var_psamArr: TArray<String>;
  I: Integer;
begin
  var_sText1 := '<tr>1</tr><tr>2</tr><tr>3</tr>';
 
   var_psamArr := var_sText1.Split(['<tr>','</tr>'], TStringSplitOptions.ExcludeEmpty);
   for I := Low(var_psamArr) to High(var_psamArr) do
   begin
     SaveOrderLog(Format('check_3_%d.txt', [I]), var_psamArr[I]);
   end;
end;

读完这篇文章后,您心情如何?
0
0
0
0
0
0
0
0
本文网址:
下一篇:没有资料