var st: TStrings; begin st := TStringList.Create; st.StrictDelimiter := True;//这个多少人用过？ st.Delimiter := ‘ ‘; st.DelimitedText := ‘0 1 2‘;//用语言描述就是 [0][空格][1][TAB键][2] ShowMessage(st.Text);//你将看到和你想象中不同的结果！！ st.Free; end;
要delphi2007+
Delphi Stringlist Delimiter如何区分TAB和空格
原文：http://www.cnblogs.com/chenmfly/p/4801979.html