TStringList - Zgodovina strani

AleÅ¡ Trtnik ob 21:58, 22. januar 2011

2011-01-22T21:58:28Z

AleÅ¡ Trtnik ob 14:38, 22. januar 2011

2011-01-22T14:38:10Z

AleÅ¡ Trtnik ob 01:50, 22. januar 2011

2011-01-22T01:50:54Z

AleÅ¡ Trtnik: /* Iskanje po disku */

2011-01-22T01:45:06Z

‎Iskanje po disku

AleÅ¡ Trtnik: /* Count */

2011-01-22T01:39:50Z

‎Count

AleÅ¡ Trtnik ob 18:47, 29. november 2010

2010-11-29T18:47:35Z

AleÅ¡ Trtnik: /* Sorted */

2010-11-29T12:04:58Z

‎Sorted

AleÅ¡ Trtnik ob 12:04, 29. november 2010

2010-11-29T12:04:29Z

AleÅ¡ Trtnik: Nova stran z vsebino: {{Work}} Razred '''TStringList''' vzdržuje liste tekstov. String liste uporabljamo za delo z seznami stringov. TStringList ima veliko lastnosti in metod za: dodajanje, brisanj...

2010-11-29T11:59:22Z

Nova stran z vsebino: {{Work}} Razred '''TStringList''' vzdržuje liste tekstov. String liste uporabljamo za delo z seznami stringov. TStringList ima veliko lastnosti in metod za: dodajanje, brisanj...

Nova stran

{{Work}}
Razred '''TStringList''' vzdržuje liste tekstov.
String liste uporabljamo za delo z seznami stringov.
TStringList ima veliko lastnosti in metod za: dodajanje, brisanje tekstov z/na določene pozicije, reorganizacijo stringov v listi, za zapis stringov v datoteko ali za branje iz datoteke, za razvrščanje stringov po velikosti, za preprečevanje podvojenih stringov v urejeni listi.
POMEMBNO: Vedno uničite TStringListo z metodo Destroy.

<source>Dim SL As TStringList, I As Long
Dim a as String

SL = CreateStringList // Kreiranje Stringliste
SL.Add ("Text 1") // Dodaj prvega, 1
SL.Add ("Text 2") // drugega 1,2
SL.Add ("Text 3") // tretjega 1,2,3
SL.Insert ("Text 4", 1)// vstavi drugo linijo teksta 1,4,2,3
SL.Exchange (0, 2) // zamenjava prve in tretje vrstice 2,4,1,3
SL.Move (0, SL.Count-1)// premik prve vrstice na zadnjo 4,1,3,2
I = SL.Find ("Text 3") //
SL.Strings (I) = "Text 5" // sprememba prva vrstice 4,1,5,2
SL.Delete (1) // briši drugo vrstico 4,5,2

// Pokaži String listo razmejeno z
Message ("Vsebina StringListe po vrsticah", SL.Text) // linijami
Message ("Vsebina StringListe z vejico ločenimi vrsticami", SL.CommaText) // vejicami
For I = 0 To SL.Count - 1 // vsaka vrstica
Message ("Vsebina vrstice " +IntToStr(i), SL.Strings (I))
Next

a = Sl.Strings(1) // beri drugo vrstico
Message ("Druga vrstica", a)
i = Sl.Data(1) // beri index druge vrstice
Message ("Index druge vrstice",IntToStr(i))

SL.Save ("C:\Test.txt") // Sharni v datoteko
SL.Clear // Briši StringListo
SL.Load ("C:\Test.txt") // Beri iz datoteke 4,5,2
SL.Add ("Some text 6") // Dodaj drugo linijo 4,5,2,6
SL.Save ("C:\Test.txt") // in shrani 4,5,2,6
SL.Destroy // Unuči stringListo
Run ("Notepad C:\Test.txt") // Z Notepad urejevalnikom poglej datoteko</source>

==Osnovne funkcije==

===Count===
Lastnost '''Count''' določa število zapisov v TStringListi.
<declaration>
RO Property|TStringList.Count
Result|Long|.
</declaration>
<source></source>

===Strings===
Lastnost '''Strings''' vrne index-ti zapis v TStringListi. Index se začne s številom 0. Uporablja se za branje ali popravljanje obstoječih zapisov. Za lokacijo določenega besedila v TStringListi uporabljajte Find metodo.
<declaration>
Property|TStringList.Strings
Index|Long|.
Result|String|.
</declaration>
<source></source>

===AsFloat===
Lastnost '''AsFloat''' je identična String lastnosti. Razlika je v tem da nam vrne podatek v numerični obliki.
<declaration>
Property|TStringList.AsFloat
Index|Long|.
Result|Float|.
</declaration>
<source>Spodnji izrazi so identični:
F=StrToFloat (SL.Strings(1))
F=SL.AsFloat(1)
in
SL.Strings(1)=FloatToStr(F)
SL.AsFloat(1)=F
</source>

===Data===
Lastnost '''Data''' lahko zapiše dodaten podatek vsaki vrstici v TStringListi. S to lastnostjo lahko pristopate k določeni vrstici v tabeli, tudi če je bila predhodno lista sortirana.
<declaration>
Property|TStringList.Data
Index|Long|.
Result|Long|.
</declaration>
<source></source>

===AsClass===
Lastnost '''AsClass''' .
<declaration>
Property|TStringList.AsClass
Index|Long|.
Result|TClass|.
</declaration>
<source></source>

===Find===
Lastnost '''Find''' vrne index pozicije iskanega teksta. TStringLista mora biti sortirana. Če podanega teksta ni v listi, je vrednost metode -1.
<declaration>
RO Property|TStringList.Find
S|String|Text, ki se išče.
Result|Long|Indeks zapisa v StringListi.
</declaration>
<source></source>

===Pos===
Lastnost '''Pos''' .
<declaration>
RO Property|TStringList.Pos
S|String|.
Result|Long|.
</declaration>
<source></source>

==Lastnosti liste==

===Duplicates===
Lastnost '''Duplicates''' določi ali se lahko v TStringListo doda podvojeni zapis.
Glede na nastavljeno Duplicates:
False: Poizkus dodajanja podvojenih zapisov se ignorira.
True: Dovoli podvajanje zapisov v listi.
Lastnost Duplicates nastavite pred dodajanjem zapisov v listo.
Pomni: Duplicates ne stori ničesar, če lista ni sortirana
.
<declaration>
Property|TStringList.Duplicates
Result|Boolean|.
</declaration>
<source></source>

===Sorted===
Lastnost '''Sorted''' opredeljuje ali je TStringLista v sortirnem načinu, kar pomeni, da se vsi zapisi samodejno sortirajo v naraščajočem načinu. Če je Tstring list v sorirnem načine, potem uporabljate Add metodo za dodajanje novih zapisov.
<declaration>
Property|TStringList.Sorted
Result|Boolean|.
</declaration>
<source></source>

==Spreminjanje liste==

===Add===
Metoda '''Add''' doda nov zapis v TStringListo. Če ima StringLista sortiranje aktivno se zapis shrani na ustrezno mesto, drugače na prvo prosto mesto. Prvo mesto v StringListi ima indeks 0. Če je lastnost Duplicates nastavljena na False in Sort na True, potem se že obstoječa vrednost ne doda v listo.
<declaration>
Method|TStringList.Add
S|String|Text, ki se bo dodal.
</declaration>

===AddStrings===
Metoda '''AddStrings''' .
<declaration>
Method|TStringList.AddStrings
SL|TStringList|.
</declaration>
<source></source>

===Insert===
Metoda '''Insert''' vrine podan text na podano mesto v TStringListi.
<declaration>
Method|TStringList.Insert
S|String|Tekst, ki se bo vrinil.
Index|Long|Mesto vrinjenja. Prvo mesto nosi index 0.
</declaration>
<source></source>

===Delete===
Metoda '''Delete''' zbriše Index-ti zapis v TStringListi. Index 0 je prvi zapis v TStringListi.
<declaration>
Method|TStringList.Delete
Index|Long|Index zapisa, ki se bo brisal.
</declaration>
<source></source>

===DeleteStrings===
Metoda '''DeleteStrings''' .
<declaration>
Method|TStringList.DeleteStrings
Index|Long|.
Count|Long|.
</declaration>
<source></source>

===Exchange===
Metoda '''Exchange''' zamenja dva zapisa v StringListi. Ne uporabljate te metode, če je StringLista v sortirnem načinu, ker se poruši način sortiranja.
<declaration>
Method|TStringList.Exchange
Index1|Long|Indeksi zapisov, ki se bodo zamenjali. Prvi index ima vrednost 0.
Index2|Long|Indeksi zapisov, ki se bodo zamenjali. Prvi index ima vrednost 0.
</declaration>
<source></source>

===Move===
Metoda '''Move''' premakne zapis v TStringListi iz FromIndex na ToIndex mesto.
<declaration>
Method|TStringList.Move
CurIndex|Long|Index zapisa, ki se bo prestavil. Prvi zapis ima vrednost 0.
NewIndex|Long|Index mesta, kamor se naj zapiše prestavljeni zapis. Prvi zapis ima vrednost 0.
</declaration>
<source></source>

===Clear===
Metoda '''Clear''' briše vse zapise v TStringListi.
<declaration>
Method|TStringList.Clear
</declaration>
<source></source>

===Text===
Lastnost '''Text''' je lista vseh zapisov v TStringListi zapisana v en string pri čemer so posamezni stringi ločeni z ( LF/ CR ) novo vrstico.
Če kateri od stringov v listi vsebuje LF/CR par bo rezultirajoča lista vsebovala več vrstic kot je dejansko zapisov.
Nova vrstica (kombinacija LF/CR) bo vrinjena ob vsakem vsebovanem LF ali CR znaku. Ni nujno, da sta par LF/CR.
Če tekst v listi vsebuje LF/CR znake je bolje uporabiti zapis ločen z vejico.
<declaration>
Property|TStringList.Text
Result|String|.
</declaration>
<source></source>

===CommaText===
Lastnost '''CommaText''' poda vrednosti TStringListe zapisane v eni vrstici ločene z vejico.
<declaration>
Property|TStringList.CommaText
Result|String|.
</declaration>
<source></source>
Zapisi, ki vsebujejo presledek, vejice ali navednice se zaprejo v navednice.
Primer, če lista vsebuje naslednje zapise:
*Stri,ng 1
*Stri”ng 2
*String 3
*String4
potem funkcija CommaText vrne naslednjo obliko:
*“Stri,ng 1”,”Stri””ng 2”,”String 3”,String4

Pri asignaciji CommaText-a, se vrednost sparsa kot SDF oblika teksta. V SDF formatu, so stringi ločeni z vejicami presledki in opcijsko zaprti v dvojne navednice. Dvojne navednice se ponovijo zato, da seločijo od stringov. Presledki in vejice, ki niso zaprte v navednice so ločila posameznih stringov. Dve vejici pomenita prazen string, dva presledka pa se ignororata. Primer z vejico ločenega texta:
*“Stri,ng 1”, ”Stri””ng 2” , String 3,String4
In seznam stringov:
*Stri,ng 1
*Stri”ng 2
*String
*3
*String4

===CustomText===
Lastnost '''CustomText''' .
<declaration>
Property|TStringList.CustomText
Separator|String|.
Result|String|.
</declaration>
<source></source>

===TokenText===
Metoda '''TokenText''' pretvori podan string S v zloge.
<declaration>
Method|TStringList.TokenText
S|String|String, ki se razbije na zloge.
</declaration>
<source></source>

==Filter funkcije==

===DeleteFilter===
Metoda '''DeleteFilter''' .
<declaration>
Method|TStringList.DeleteFilter
S|String|.
</declaration>
<source></source>

===Filter===
Lastnost '''Filter''' .
<declaration>
RO Property|TStringList.Filter
S|String|.
Result|TStringList|.
</declaration>
<source></source>

===Replace===
Metoda '''Replace''' nadomesti tekst ChangeWhat v tekst ChangeTo v TStringListi.
<declaration>
Method|TStringList.Replace
ChangeWhat|String|Tekst, ki se bo spremenil.
ChangeTo|String|Tekst v kaj se naj spremeni.
</declaration>
<source></source>

==Nalaganje in shranjevanje==

===Load===
Metoda '''Load''' naloži podano datoteko na disku in jo zapiše v TStringListo, tako da je vsaka vrstica (carriage return ali linefeed) zapisana kot naslednji zapis.
<declaration>
Method|TStringList.Load
FileName|String|Polno ime datoteke.
</declaration>
<source></source>

===Save===
Metoda '''Save''' shrani vsebino TStringListe v imenovano datoteko na disku. Vsak zapis je zapis v svoji vrstici v datoteki.
<declaration>
Method|TStringList.Save
FileName|String|Polno ime datoteke.
</declaration>
<source></source>

===LoadXML===
Metoda '''LoadXML''' .
<declaration>
Method|TStringList.LoadXML
FileName|String|.
</declaration>
<source></source>

==Iskanje po disku==

===FindFiles===
Metoda '''FindFiles''' zapiše v TStringListo vse najdene datoteke v podanem direktoriju.
<declaration>
Method|TStringList.FindFiles
Path|String|Začetni direktorij (mapa), kjer naj se iščejo datoteke.
Mask|String|Definicija tipa datotek, ki se iščejo. Primer: "*.txt" vrne vse datoteke z ekstenzijo TXT.
Recursive|Boolean|Opredelitev ali se datoteke iščejo tudi v poddirektorijih.
</declaration>
<source></source>

===FindFolders===
Metoda '''FindFolders''' zapiše v TStringListo vse poiskane direktorije.
<declaration>
Method|TStringList.FindFolders
Path|String|Začetni direktorij (mapa), kjer naj se iščejo poddirektoriji.
Mask|String|Definicija tipa direktorijev, ki se iščejo. Primer: "*" vrne vse direktorije brez ekstenzije.
Recursive|Boolean|Opredelitev ali se direktoriji iščejo tudi v poddirektorijih.
</declaration>
<source></source>

==Uničenje objekta==

===Destroy===
Metoda '''Destroy''' uniči objekt tipa TStringList.
<declaration>
Method|TStringList.Destroy
</declaration>
<source></source>

===DestroyObjects===
Metoda '''DestroyObjects''' .
<declaration>
Method|TStringList.DestroyObjects
</declaration>
<source></source>

[[Category:Razredi]]
[[Category:SDMS Basic]]

@@ Vrstica 327: / Vrstica 327: @@
 <source>Dim SL As TStringList
 SL = CreateStringList                  // Kreiraj StringListo
-// Fills it with all files on C disk
+SL.FindFiles ("C:\", "*.*", True)      // Napolni listo z vsemi datotekami na C disku
 SL.Save ("C:\VseDatoteke.txt")         // Shrani na disk
 SL.Clear                               // Briši listo
-// Fills it with all folders on C disk
+SL.FindFolders ("C:\", "*.*", True)    // Napolni listo z vsemi mapami na C disku
 SL.Save ("C:\VseMape.txt")             // Shrani na disk
-SL.Destroy                             // uniči StringListo</source>
+Destroy (SL)                           // uniči StringListo</source>
 ===FindFiles===

@@ Vrstica 372: / Vrstica 372: @@
 <source></source>
+[[Category:Razredi tabel|StringList]]
-[[Category:Razredi]]
+[[Category:Razredi|StringList]]
-[[Category:SDMS Basic]]
+[[Category:SDMS Basic|StringList]]

@@ Vrstica 29: / Vrstica 29: @@
   Message ("Index druge vrstice",IntToStr(i))
 SL.Clear                 // Briši StringListo
-SL.Load ("C:\Test.txt")  // Beri iz datoteke               4,5,2
+</source>
 ==Osnovne funkcije==
@@ Vrstica 268: / Vrstica 263: @@
 ==Filter funkcije==
+<source>Dim SL, SL1 As TStringList
-===DeleteFilter===
+SL = CreateStringList                  // Kreiraj StringListo
-Metoda '''DeleteFilter''' .
+SL.Load ("C:\VseDatoteke.txt")         // Napolni listo
-<declaration>
+SL1 = SL.Filter("aa")                  // V novo listo da vse tekste, ki vsebujeo "AA"
-Method|TStringList.DeleteFilter
+SL1.Save ("C:\VseDatotekeZaa.txt")     // Shrani novo listo na disk
-S|String|.
+Destroy (SL1)                          // uniči novo listo
-</declaration>
+SL.DeleteFilter("aa")                  // Iz liste odstrani vse tekste, ki vsebujeo "AA"
-<source></source>
+SL.Save ("C:\VseDatotekeBrezaa.txt")   // Shrani listo na disk
 ===Filter===
-Lastnost '''Filter''' .
+Lastnost '''Filter''' prenese določene tekste v novo listo. To novo listo je potrebno dealocirati.
 <declaration>
 RO Property|TStringList.Filter
-S|String|.
+S|String|Text, ki mora biti vsebovan v vrstici, da se vrstica doda med rezultate.
-Result|TStringList|.
+Result|TStringList|Nova lista, ki vsebuje samo tekste, ki vsebujejo iskani tekst.
 </declaration>
-<source></source>
+V novo listo se prenese tudi {{PL|Data}} oziroma {{PL|AsClass}} parameter. {{ToDo|A je to res}}
-===Replace===
+===DeleteFilter===
-Metoda '''Replace''' nadomesti tekst ChangeWhat v tekst ChangeTo v TStringListi.
+Metoda '''DeleteFilter''' zbriše določene tekste iz listo.
 <declaration>
-Method|TStringList.Replace
+Method|TStringList.DeleteFilter
-ChangeWhat|String|Tekst, ki se bo spremenil.
+S|String|Text, ki mora biti vsebovan v vrstici, da se vrstica izbriše.
 </declaration>
 ==Nalaganje in shranjevanje==
@@ Vrstica 351: / Vrstica 345: @@
 Mask|String|Definicija tipa direktorijev, ki se iščejo. Primer: "*" vrne vse direktorije brez ekstenzije.
 Recursive|Boolean|Opredelitev ali se direktoriji iščejo tudi v poddirektorijih.
 </declaration>

@@ Vrstica 296: / Vrstica 296: @@
 ==Nalaganje in shranjevanje==
 ===Load===
-Metoda '''Load''' naloži podano datoteko na disku in jo zapiše v TStringListo, tako da je vsaka vrstica (carriage return ali linefeed) zapisana kot naslednji zapis.
+Metoda '''Load''' naloži podano datoteko iz diska, tako da je vsaka vrstica (carriage return ali linefeed) zapisana kot naslednji zapis. Obstoječa vsebina liste se ob nalaganju datoteke izbriše.
 <declaration>
 Method|TStringList.Load
 FileName|String|Polno ime datoteke.
 </declaration>
 ===Save===
-Metoda '''Save''' shrani vsebino TStringListe v imenovano datoteko na disku. Vsak zapis je zapis v svoji vrstici v datoteki.
+Metoda '''Save''' shrani vsebino liste v datoteko na disku. Vsak zapis je v datoteki zapisan v svoji vrstici.
 <declaration>
 Method|TStringList.Save
 FileName|String|Polno ime datoteke.
 </declaration>
 ===LoadXML===
-Metoda '''LoadXML''' .
+Metoda '''LoadXML''' naloži podano XML datoteko iz diska. {{ToDo|kako naloži}}
 <declaration>
 Method|TStringList.LoadXML
-FileName|String|.
+FileName|String|Polno ime datoteke.
 </declaration>
 ==Iskanje po disku==
@@ Vrstica 351: / Vrstica 354: @@
 ===DestroyObjects===
-Metoda '''DestroyObjects''' .
+Metoda '''DestroyObjects''' dealocira razred in vse razrede, ki so dostopni preko {{PL|AsClass}} metode.
 <declaration>
 Method|TStringList.DestroyObjects
 </declaration>
-<source></source>
+To je samo v primeru, ko je bil objekt alociran z metodo {{EL|TRecordList|GroupByLists}} ali {{EL|TRecordList|GroupByListsFormula}}. V vseh ostalih primerih se za dealokacijo uporabi  funkcijo {{EL|Rutine|Destroy}}.
 ==Opuščeno==

@@ Vrstica 45: / Vrstica 45: @@
 <declaration>
 RO Property|TStringList.Count
-Result|Long|.
+Result|Long|Velikost liste tekstov.
 </declaration>
 ===Strings===

@@ Vrstica 131: / Vrstica 131: @@
 Result|Boolean|.
 </declaration>
-<source></source>
+<source>Dim SL As TStringList, I As Long
 ==Spreminjanje liste==

@@ Vrstica 309: / Vrstica 309: @@
 ==Iskanje po disku==
 ===FindFiles===
@@ Vrstica 318: / Vrstica 329: @@
 Recursive|Boolean|Opredelitev ali se datoteke iščejo tudi v poddirektorijih.
 </declaration>
 ===FindFolders===