《轉》delphi TStringList的用法

2021-08-29 06:43:51 字數 2997 閱讀 2988

delphitstringlist的用法

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。

const

constr :string = 'aaa\bbb\ccc\ddd';

var

strs :tstrings;

i :integer;

begin

strs :=tstringlist.create;

strs.delimiter := '\';

strs.delimitedtext := constr;

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

showmessage(strs[i]);

end;

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

delimiter為分隔符,預設為:','。delimitedtext就是按delimiter為分隔符的乙個串,得到賦值後回把這個字串按delimiter的字元新增到tstrings中。

說到這裡,有想起乙個屬性,quotechar。其預設值為:'"'(不包括單引號)

有何用呢?看例子:

const

constr :string = '"aaa"\"bbb"\"ccc"\"ddd"';

var

strs :tstrings;

i :integer;

begin

strs :=tstringlist.create;

strs.delimiter := '\';

strs.delimitedtext := constr;

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

showmessage(strs[i]);

end;

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

再來看乙個例子:

const

constr :string = '|aaa|\|bbb|\|ccc|\|ddd|';

var

strs :tstrings;

i :integer;

begin

strs :=tstringlist.create;

strs.delimiter := '\';

strs.quotechar := '|';

strs.delimitedtext := constr;

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

showmessage(strs[i]);

end;

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

但是還要多說一句,當delimiter為:','而quotechar為:'"'時,delimitedtext和commatext是同等的。

最後要說的三個是:names & values & valuefromindex。

看看下面的**:

const

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

var

strs :tstrings;

i :integer;

begin

strs :=tstringlist.create;

strs.commatext := constr;

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

begin

showmessage(strs.names[i]);

showmessage(strs.values[strs.names[i]]);

showmessage(strs.valuefromindex[i]);

end;

end;

通過這個例子不難看出:

這個時候strs中的內容是:

0=aaa

1=bbb

2=ccc

3=ddd

而names中則是:

0

1

2

3

在values中則是:

aaa

bbb

ccc

ddd

似乎有點不合適宜,但誰也不能否認,delphi還是蠻好用的,這個是最近兩天中碰到的問題的解法

GPT轉MBR怎麼轉?

如果本身電腦有兩個硬碟,可以直接在win7 win8系統下進行gpt轉mbr 如果只有乙個硬碟,那可以進入winpe裡面進行gpt磁碟轉mbr磁碟。注 gpt轉mbr必須得清空硬碟上的所有資料!請注意儲存資料!1 在win7 win8系統下,按快捷鍵 win r 彈出執行視窗,然後輸入 cmd wi...

GPT轉MBR怎麼轉?

如果本身電腦有兩個硬碟,可以直接在win7 win8系統下進行gpt轉mbr 如果只有乙個硬碟,那可以進入winpe裡面進行gpt磁碟轉mbr磁碟。注 gpt轉mbr必須得清空硬碟上的所有資料!請注意儲存資料!1 在win7 win8系統下,按快捷鍵 win r 彈出執行視窗,然後輸入 cmd wi...

java後台轉json 轉物件 轉list集合

前台資料傳遞到後台轉json 1 普通格式轉換成物件 string data request.getparameter data 單資料的時候轉換方式 jsonobject json jsonobject.fromobject data tree tree tree jsonobject.tobea...