避免StringList将空格识别为分隔符

最新推荐文章于 2024-05-21 08:30:10 发布

池龙

最新推荐文章于 2024-05-21 08:30:10 发布

阅读量1.2k

点赞数 1

分类专栏： Delphi / Lazarus

Delphi / Lazarus 专栏收录该内容

25 篇文章 2 订阅

订阅专栏

正常情况下，用Delimiter对字符串进行分隔时，无论分隔符为什么，空格都会自动按分隔符处理。

设置Stringlist.StrictDelimiter := True;可以避免这种情况。

示例代码：

procedure TForm1.btn1Click(Sender: TObject);
var
  s : TStringList;
begin
  s := TStringList.Create;
  //s.StrictDelimiter := True;  //若有这句代码,那么s.count = 3,否则就变为7
  s.Delimiter := ';';
  s.DelimitedText:= 'a b c;d e f;';
  ShowMessage(IntToStr(s.Count)+#13+S[0]+#13+S[1]);
end;