解决方案 »

  1. cvm
  2. QuoteChar只有在你内容中包含Delimiter符的时候才会被添加,这种你可以继承一个TStringList,然后override DelimitedText,当然也可以override Add,添加时候就把单引号给添加了,具体看你需求。var
    s: TStringList;s:= TStringList.Create;
    s.Add('aa,a');
    s.Add('bb,b');
    s.Add('cc,c');
    s.Add('dd,d');
    s.Delimiter:=',';
    s.QuoteChar:='''';
    s.StrictDelimiter:= True;
    showmessage(s.DelimitedText);
    比如这样就会带上单引号