tstringlist

//TStringList 常用方法与属性:varList: TStringList;i: Integer;beginList := TStringList.Create;List.Add(‘Strings1‘); {添加}List.Add(‘Strings2‘);List.Exchange(0,1); {置换}List.Insert(0,‘Strings3‘); {插入}i := List.IndexOf(‘Strings1‘); {第一次出现的位置}List.Sort; {排序}List.Sorted := True; {指定排序}List.Count; {总数}List.Text; {文本集合}List.Delete(0); {删除, 0是第一个数据}List.LoadFromFile(‘c:\tmp.txt‘);{打开}List.SaveToFile(‘c:\tmp.txt‘); {保存}List.C

Delphi Tstringlist Usage Detailed.Tstringlist Common Methods and properties:varlist:tstringlist; I:integer;beginList:= Tstringlist.Create; List.add ('STRINGS1');{Add}List.add ('STRINGS2'); List.exchange (0,1);{Displacement}List.insert (0,'STRINGS3');{Insert}I:= List.indexof ('STRINGS1');{the first occurrence of the position}List.sort; {Sort}list.sorted:= True;{Specify sort}List.count; {Total}List.text; {Text Collection}List.delete (0);{Delete, 0 is th

Problem Source: http://www.cnblogs.com/del/archive/2008/12/29/1230404.html#1416838 For example, there are two tstringlist objects: list1 and list2; List2.assign (list1) is to copy the content of list1 to list2; List2: = list1 is equivalent to giving list1 another name. Example: Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls; Type tform1 = Class (tf

The usage of Delphi tstringlist tstrings is an abstract class. In actual development, tstrings have the most applications besides the basic types. We all know the general usage. Now we will discuss some of its advanced usage. First, list the several attributes to be discussed: 1. commatext 2. delimiter delimitedtext 3. First read the names Values valuefromindex: commatext. How to use it? Use code to speak: Const Constr: String = 'aaa, BBB, CCC, DDD

//tstringlist Common Methods and properties:varList:tstringlist; I:integer;beginList: = tstringlist.create; List.add (' STRINGS1 ');{Add}List.add (' Strings2 '); List.exchange (0,1);{permutation}List.insert (0,' STRINGS3 ');{Insert}I: = List.indexof (' STRINGS1 ');{The first occurrence of a position}List.sort;{sort}list.sorted: = True;{Specify sort}List.count;{Total}List.text;{text Collection}List.delete (0);{Delete, 0 is the first data}List.loadfromf

The data in the tstringlist is obtained by Directly Reading text files, or by using the idtcphttp protocol from the web page of the website. VaR shtml: tstringlist; Shtml: = tstringlist. Create;Shtml. Add (data );Icouter: = shtml. count; Although the data contains multiple lines of text, the value of icouter is 1! To bypass this issue, add a Momo control and m

//tstringlist Common Methods and properties:varList:tstringlist; I:integer;beginList: = tstringlist.create; List.add (' STRINGS1 ');{Add}List.add (' Strings2 '); List.exchange (0,1);{permutation}List.insert (0,' STRINGS3 ');{Insert}I: = List.indexof (' STRINGS1 ');{The first occurrence of a position}List.sort;{sort}list.sorted: = True;{Specify sort}List.count;{Total}List.text;{text Collection}List.delete (0);{Delete, 0 is the first data}List.loadfromf

In Delphi, The tstringlist contains a function called find. It searches for a string in a stringlist and returns the index of this string in the stringlist. Descriptions in Delphi help are as follows: Locates the index for a string in a sorted list and indicates whether a string with that value already exists in the list. Delphi Syntax: Function find (const S: string; var index: integer): Boolean; virtual; C ++ Syntax: Virtual bool _ fastcall find (co

Delphi Tstringlist Usage DetailedTstringlist Common Methods and properties:varlist:tstringlist; I:integer;beginList:= Tstringlist.Create; List.add ('STRINGS1');{Add}List.add ('STRINGS2'); List.exchange (0,1);{Displacement}List.insert (0,'STRINGS3');{Insert}I:= List.indexof ('STRINGS1');{the first occurrence of the position}List.sort; {Sort}list.sorted:= True;{Specify sort}List.count; {Total}List.text; {Text Collection}List.delete (0);{Delete, 0 is the

Dlgsave: = Tsavedialog.Create(Nil); Dlgsave.filter:='csv file |*. CSV'; Dlgsave.defaultext:='*. CSV'; Dlgsave.filename:='service. CSV'; ifDlgsave.execute Then begin ifFileExists (Dlgsave.filename) Then Try ifMessagedlg ('the file already exists, do you want to overwrite it? ', Mtinformation, [Mbyes, Mbno],0) =Idyes ThenDeleteFile (PChar (dlgsave.filename))Else beginExit; End; exceptExit; End; FileName:=Dlgsave.filename; Savecurpage (filename); End; SList:= Tstringlist.Cre

1, set sorted: = TRUE;2. Add DataAdd (' 3 '); Add (' 4 '); Add (' 1 ');ShowMessage (Commatext);//1,3,43, and then modify the sorted property to False, the previously added data will not revert to the order of addition 341Adding new Data Add (' 5 ');4, ShowMessage (commatext);//1345procedure tstringlist.setsorted (Value:boolean); begin if Then begin if Then Sort; When you modify the sorted property, only the new value is true, and the new value is false when fsorted is not sorted:= Value; End

Dynamic arraysTstringdynarray ls;ls = splitstring (Spara, "|");for (int i = 0; i Tstringdynarray ar; ar[0]=2; Ar[25]= ""; Ar.set_length (28); ar[0]=2; Ar. Length;[CPP]View Plaincopyprint? Tstringdynarray arr; arr = System::ioutils::tdirectory::getfiles ("C:\\Windows"); This->memo1->lines->addstrings (arr); Tstringdynarray Arr;arr = system::ioutils::tdirectory::getfiles ("C:\\Windows");this->memo1->lines-> AddStrings (arr);[CPP]View Plaincopyprint? arr = System::io

Tstringlist Common operations//Tstringlist Common Methods and properties:VarList:tstringlist; I:integer;BeginList: =Tstringlist.create; List.add (‘Strings1‘);{Add to}List.add (‘Strings2‘); List.exchange (0,1);{Replacement}List.insert (0,‘Strings3‘);{Insert}I: = List.indexof (‘Strings1‘);{The first occurrence of the position}List.sort;{Sort}list.sorted: = True;{Specify sort}List.count;{Total}List.text;{Text