避免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;

你可能感兴趣的:(Delphi,/,Lazarus)