程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> .NET網頁編程 >> .NET實例教程 >> TStringList的用法

TStringList的用法

編輯:.NET實例教程
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。對比一下,應該不難明白吧?這個就不多說了,用得也不多。
  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved