stringList带空格分割

正常情况下,用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;