TStringList的用法

版權聲明：本文為部落客原創文章，未經部落客允許不得轉載。 https://blog.csdn.net/chinahuyong/article/details/4026518

TStringList的用法

TStrings是一個抽象類，在實際開發中，是除了基本類型外，應用得最多的。

正常的用法大家都知道，現在來讨論它的一些進階的用法。

先把要讨論的幾個屬性列出來：

1、CommaText

2、Delimiter & DelimitedText

3、Names & Values & ValueFromIndex

先看第一個：CommaText。怎麼用呢？用代碼說話：

const

  constr :String = 'aaa,bbb,ccc,ddd';

var

  strs :TStrings;

  i :Integer;

begin

  strs := TStringList.Create;

  strs.CommaText := constr;

  for i := 0 to Strs.Count-1 do

    ShowMessage(Strs[i]);

end;

執行了這段代碼後，可以看到ShowMessage顯示出來的分别是：aaa bbb ccc ddd。

也就是說，strs.CommaText := constr這一句的作用，就是把一個字元串以','為分割符，分段添加到TStrings中。

那麼如果不是以','來分割，又該怎麼做呢？現在看第二個例子。使用Delimiter和DelimitedText。

  constr :String = 'aaa/bbb/ccc/ddd';

  strs.Delimiter := '/';

  strs.DelimitedText := constr;

可以看到， 顯示的效果和第一個例子是一模一樣的。解釋一下：

Delimiter為分隔符，預設為：','。DelimitedText就是按Delimiter為分隔符的一個串，得到指派後回把這個字元串按Delimiter的字元添加到TStrings中。

說到這裡，有想起一個屬性，QuoteChar。其預設值為：'"'（不包括單引号）

有何用呢？看例子：

  constr :String = '"aaa"/"bbb"/"ccc"/"ddd"';

顯示出來的仍然是aaa bbb ccc ddd。為什麼不是："aaa" "bbb" "ccc" "ddd"呢？

再來看一個例子：

  constr :String = '|aaa|/|bbb|/|ccc|/|ddd|';

  strs.QuoteChar := '|';

顯示出來的又是aaa bbb ccc ddd。對比一下，應該不難明白吧？這個就不多說了，用得也不多。

但是還要多說一句，當Delimiter為：','而QuoteChar為：'"'時，DelimitedText和CommaText是同等的。

最後要說的三個是：Names & Values & ValueFromIndex。

看看下面的代碼：

  constr :String = '0=aaa,1=bbb,2=ccc,3=ddd';

  for i := 0 to strs.Count-1 do

  begin

    ShowMessage(strs.Names[i]);

    ShowMessage(strs.Values[strs.Names[i]]);

    ShowMessage(strs.ValueFromIndex[i]);

  end;

通過這個例子不難看出：

這個時候strs中的内容是：

0=aaa

1=bbb

2=ccc

3=ddd

而Names中則是：

1

2

3

在Values中則是：

aaa

bbb

ccc

ddd