10.2. Methoden

~ TStrings
Destructor.

Hinzufügen
Schreibe einen String an das Ende der Liste. Die Add-Methode gibt den Index der neuen Kette.

 virtual int __fastcall hinzufügen (const System:: AnsiString S); 

BeginUpdate und EndUpdate Sollte tritt immer Ausnahme sein wird in Verbindung mit einem try ... catch-Anweisung, ist, dass Sie sicher Called EndUpdate wenn eine. Verwendet wird ein Block, BeginUpdate und EndUpdate Typischerweise sieht wie folgt aus:

 void __fastcall TForm1:: Button1Click (TObject * Sender)
{
ListBox1-> Artikel-> BeginUpdate ();
try {
ListBox1-> Items-> Clear ();
ListBox1-> Items-> Add ("Einige foo");
ListBox1-> Items-> Add ("Einige Daten");
ListBox1-> Artikel-> EndUpdate ();
}
Fang (...){
ListBox1-> Artikel-> EndUpdate (); / / ausgeführt Veranstaltungen im Fall einer Ausnahme
zu werfen;
}
} 

AddObject
Schreibe einen String in der Liste, und ordnet ein Objekt in der Kette.

 virtual int __fastcall AddObject (const System:: AnsiString S, System:: TObject * AObject) 

Beschreibung

Call AddObject Hinzufügen einer Zeichenfolge und die zugehörigen Objekt auf der Liste. AddObject gibt den Index des neuen String und Objekt.

Dieser Code fügt die Zeichenfolge 'Orange' und einer Bitmap von einem orangefarbenen einem Owner-Draw-Listenfeld:

 void __fastcall TForm1:: Button1Click (TObject * Sender)
{
TIcon * Icon;
Icon = new TIcon;
Icon-> LoadFromFile (Orange.es ");
ListBox1-> Artikel-> AddObject ("Orange", Icon);
} 

AddStrings
Fügen Sie eine Gruppe von Strings auf der Liste. Zum Beispiel, kopieren Sie den Inhalt eines Memos in einem anderen.

 virtual void __fastcall AddStrings (TStrings * Streicher); 

Beschreibung

Call AddStrings auf Objekt hinzufügen die Saiten aus einer anderen TStrings auf der Liste. Wenn sowohl die Quell-und Ziel-Strings Objekte findet Unterstützung TStrings Objekte mit ihren, für die assoziierten Objekte Verweise sowie zugesetzt werden.

Dieser Code fügt der Liste von Strings Strings Enthalten in ListBox1-> Items zum Ende des ListBox2-> Items Liste:

 void __fastcall TForm1:: Button1Click (TObject * Sender)
{
ListBox2-> Artikel-> AddStrings (ListBox1-> Items);
} 

Append
Fügen Sie die Zeichenfolge S auf der Liste. Die Append-Methode ist die gleiche wie hinzufügen, außer dass es wieder nicht ohne Nennwert.

 __fastcall nichtig anhängen (const System:: AnsiString S); 

Beschreibung

Append Verwendung Wenn Es besteht keine Notwendigkeit zu wissen String den Index der, nachdem er-aufgenommen worden, oder mit Nachfahren von TStrings für den Index zurück Welches ist nicht aussagekräftig.

Zum Beispiel, Memo Gebrauchtwagen Nutzung durch TStrings Nachkomme Objekte die einen Index zu bestimmen, wo zum Einfügen einer Zeichenfolge, die eingefügt String funktioniert Aber nicht unbedingt am Ende als eine einzelne Zeichenfolge in der Liste. Ein Teil der eingefügte Text Mai Werden Sie Teil der vorherigen Saite, und ein Teil-String abgebrochen A kann Nachfolgende Into. Der Index hinzufügen zurück nach nicht sinnvoll ist in diesem Fall.

Verwenden Sie anhängen rather than TGetStrProc hinzufügen als Parameter für eine Funktion Aufforderung eines.

Dieser Code verwendet eine Schaltfläche und ein Listenfeld auf einem Formular. Wenn der Benutzer auf die Schaltfläche klickt, fügt die Code eine neue Zeichenfolge ein Listenfeld.

 void __fastcall TForm1:: Button1Click (TObject * Sender)
{
ListBox1-> Artikel-> Append ("New String");
} 

Zuweisen
Diese Methode kopiert die Saiten Objekt enthalten in der Liste der TString Objekt zum anderen. Es überschreibt den Inhalt.

 virtual void __fastcall zuordnen (TPersistent * Quelle); 

Beschreibung

Verwenden Weisen bis September den Wert des Objekts von einem anderen TStrings Objekt. Wenn Quelle ist vom Typ TStrings, ist die Liste im September auf der Liste der gefundenen TStrings Objekt, und wenn zugeordneten Objekte unterstützt werden, dem Vertrag verbundene Objekte Quelle kopiert aus dem ebenso.

Quelle Wenn nicht ist vom Typ TStrings, die geerbte Methode zuordnen September wird die Liste Wert des Objekts von diesem unterstützt jede TStrings in AssignTo STI.

Dieses Beispiel besteht aus einem Memo-Formular mit einer Listbox. Wenn die Schaltfläche geklickt wird, den Inhalt der Mitteilung sind die Listbox gefüllt mit dem Inhalt der.

 void __fastcall TForm1:: Button1Click (TObject * Sender)
{
Memo1-> Lines-> assign (ListBox1-> Items);
} 

BeginUpdate
TStrings Ermöglicht das Objekt zu verfolgen, wenn die Liste der Saiten verändert.

 void __fastcall BeginUpdate (void); 

Beschreibung

Automatisch BeginUpdate Ist Saiten Called By Any Eigenschaft oder Methode, die geändert Liste der. Sobald die Änderungen abgeschlossen sind, die Eigenschaft oder Methode ruft EndUpdate. Vor BeginUpdate Anruf direkt Ändern des Strings in der Liste, und EndUpdate nach. Bei der Umsetzung von Methoden, Eigenschaften oder ändern Sie die Liste in Nachkommen TStrings, rufen BeginUpdate, bevor die Änderungen vorgenommen werden, und EndUpdate Wenn die Änderungen abgeschlossen sind.

Einfach TStrings Verfolgt, um die Liste der Saiten wird geändert. Einige Nachkommen von TStrings diese Informationen benutzen, um vollständige Durchführung bestimmter Aktionen, z. B. erzählt ein Steuerelement repaint, Updates Wann sind.

BeginUpdate und EndUpdate Sollte tritt immer Ausnahme sein wird in Verbindung mit einem try ... catch-Anweisung, ist, dass Sie sicher Called EndUpdate wenn eine. Verwendet wird ein Block, BeginUpdate und EndUpdate Typischerweise sieht wie folgt aus:

 void __fastcall TForm1:: Button1Click (TObject * Sender)
{
ListBox1-> Artikel-> BeginUpdate ();
try {
ListBox1-> Items-> Clear ();
ListBox1-> Items-> Add ("Einige foo");
ListBox1-> Items-> Add ("Einige Daten");
ListBox1-> Artikel-> EndUpdate ();
}
Fang (...){
ListBox1-> Artikel-> EndUpdate (); / / ausgeführt Veranstaltungen im Fall einer Ausnahme
zu werfen;
}
} 

Clear
Leeren Sie die Liste und die damit verbundenen Objekte.

 virtual void __fastcall Clear (void) = 0; 

Beschreibung

Nachkommen von TStrings umgesetzt Clear-Methode zu löschen alle Fäden in der, und Stock und Objekte entfernen Sie Verweise auf assoziiert.

Dieses Beispiel füllt die Liste eines Kombinationsfeld mit der Menge der verfügbaren Schriftarten Wenn der Benutzer nach unten sinkt der Liste. Die Liste ist nach unten jedesmal neu die Liste gelöscht wird, also wenn die Anwendung oder fügt entfernen Schriften, Combo-Box bleibt der Strom.

 __fastcall nichtig Form1:: ComboBox1DropDown (TObject * Sender)
{
FontCombo-> Artikel-> BeginUpdate (), / / Bis zu verhindern Repaints getan
FontCombo-> Items-> Clear () / / leeren Liste der alten Werte und Stock
FontCombo-> Sortiert = true, / / sicherstellen, dass die Font-Namen sortiert werden
FontCombo-> Items = Screen-> Fonts, / / fügen Sie die aktuelle Liste der Schriftarten
FontCombo-> Artikel-> EndUpdate (); / / reaktivieren Malerei
} 

Löschen
Löscht eine Zeichenkette, die den Index-Liste.

 virtual void __fastcall Löschen (int index) = 0; 

Beschreibung

Nachkommen von TStrings umgesetzt Löschen angegebene Methode zur Liste entfernen einen String aus der. Wenn ein Objekt String die verbunden ist mit Verweis auf das Objekt ist ebenfalls gelöscht. Index gibt die Position der Zeichenkette, wo 0 ist die erste Saite, 1 ist die zweite Saite, und so weiter.

In diesem Beispiel wird ein Listenfeld und eine Schaltfläche auf einem Formular. Wenn das Formular angezeigt, Box sind fünf Elemente in der Liste. Wenn der Benutzer auf die Schaltfläche klickt, das zweite Element in dem List-Feld wird gelöscht:

 void __fastcall TForm1:: Button1Click (TObject * Sender)
{
ListBox1-> Items-> Löschen (1);
} 

EndUpdate
TStrings Ermöglicht das Objekt zu verfolgen, wenn die Liste von Zeichenketten Sie fertig Ändern halten.

 void __fastcall EndUpdate (void); 

Beschreibung

Automatisch EndUpdate Ist Saiten Called By Any Eigenschaft oder Methode, die geändert Liste der. Vor BeginUpdate Anruf direkt Ändern des Strings in der Liste, und EndUpdate nach. Bei der Umsetzung von Methoden, Eigenschaften oder ändern Sie die Liste in Nachkommen TStrings, rufen BeginUpdate, bevor die Änderungen vorgenommen werden, und EndUpdate Wenn die Änderungen abgeschlossen sind.

Einfach TStrings Verfolgt, um die Liste der Saiten wird geändert. Einige Nachkommen von TStrings diese Informationen benutzen, um vollständige Durchführung bestimmter Aktionen, z. B. erzählt ein Steuerelement repaint, Updates Wann sind.

Equals
Vergleichen Sie die Liste der Sender auf der Liste mit anderen Objekten TStrins und liefert true, wenn die beiden Listen gleich sind.

 __fastcall bool Equals (TStrings * Streicher); 

Beschreibung

Rufen Sie Equals zum Vergleich der beiden Listen in TStrings Objekte. Equals vergleichen nur die Saiten, nicht alle Verweise auf zugeordnete Objekte. Equals true zurück, wenn die Listen für Objekte TStrings haben beide die gleiche Anzahl von Saiten und die Saiten in jeder Liste sind identisch. Equals false zurück, wenn die Listen unterscheiden sich in Länge, sie Strings enthalten verschiedene, oder wenn die Reihenfolge der Strings in den beiden Listen Diff.

Exchange
Tauscht die Positionen von zwei Strings in der Liste.

 __fastcall virtual void Exchange (int index1, int index2); 

Beschreibung

Call Exchange ordnen Sie die Strings in der Liste. Die Saiten sind Angegebene durch ihre Indexwerte im index1 und index2. Sind nullbasierten Indizes, so dass die erste Zeichenfolge in der Liste haben einen Index-Wert von 0, das zweite hat einen Index-Wert von 1, und so weiter.

Entweder, wenn Sie ein Objekt zugeordnet Zeichenfolge, Exchange Ändern Sie die Position des Objekts als auch.

GetText
Vergeben Sie einen Text-Puffer und füllt es mit der Text-Eigenschaft Wert.

 __fastcall virtuellen char * GetText (void); 

Beschreibung

GetText Call Erhalten dynamisch zugewiesen, um ein Zeichen Puffer alle Saiten in der Liste. Einzelnen Strings Feed Getrennt durch einen Wagenrücklauf und Zeile. Der Aufrufer ist dafür verantwortlich Befreiung der zurückgegebene Wert.

Beispiel:

 String-Daten;
M = Memo1-> Lines-> GetText (); / / Löschen Sie alle Zeilen mit Wagenrücklauf und Zeilenvorschub getrennt 

IndexOf
Gibt die Position eines Strings in der Liste. Der Text muss mit dem ganzen Linie.

 __fastcall virtual int IndexOf (const System:: AnsiString S);

if (Memo1-> Lines-> IndexOf ("Win.ini")> -1); 

Beschreibung

Call IndexOf erhalten die Position des ersten Auftretens der Zeichenfolge S. IndexOf gibt die 0-basierte Index des Strings. So, S entspricht, wenn die erste Zeichenkette in der Liste, IndexOf 0 zurück, wenn S die zweite Saite, IndexOf 1 zurück, und so weiter. Wenn die Zeichenfolge nicht in der String-Liste, IndexOf -1 zurück.

Hinweis: Wenn die Zeichenfolge in der Liste erscheint mehr als Eleven, IndexOf Vorkommen gibt die Position des ersten.

Dieses Beispiel verwendet eine Datei Listenfeld ein Verzeichnis Listenfeld, und ein Label in einem Formular. Wenn der Benutzer Feld verwendet die Verzeichnis-Liste auf Verzeichnisse ändern, erscheint eine Meldung und die Farbe der Form, wenn die Änderungen Datei AUTOEXEC.BAT in das neue Verzeichnis. Der Code ist Box Geschrieben in das OnChange-Ereignis der Verzeichnis-Liste:

 void __fastcall TForm1:: DirectoryListBox1Change (TObject * Sender)
{
FileListBox1-> Directory = DirectoryListBox1-> Verzeichnis;
if (FileListBox1-> Artikel-> IndexOf ("AUTOEXEC.BAT")> -1) {
Farbe = clYellow;
Label1-> Caption = "Sie befinden sich im Root-Verzeichnis!"
}
} 

IndexOfName
Gibt die Position des ersten String der Form Name = Wert mit dem Namen especifífico.

 int __fastcall IndexOfName (const System:: AnsiString Name);

pos = Memo1-> Lines-> IndexOfName (Variable3 ") / / Gibt die Zeilennummer 

Beschreibung

Call IndexOfName zu lokalisieren Parameter des ersten Auftretens einer Zeichenfolge mit der Form Name = Wert, bei dem Name Teil ist gleich der Name. IndexOfName gibt die 0-basierte Index des Strings. Wenn keine Zeichenfolge in der angezeigten Liste hat den Namen, IndexOfName -1 zurück.

Strings der Form Name = Wert sind häufig gefundenen Dateien auf INI. Zum Beispiel, hier sind ein paar Strings INI genommen aus einer Datei typisch.:

Displaygrid = 1

SnapToGrid = 1
GridSizeX = 8
GridSizeY = 8

Zeichenfolgen, die Make-up die Eigenschaft params einer Datenbank-Komponente (TDatabase) Haben Sie dieses Format auch.

Der Name, den String-ID ist auf der linken Seite des Gleichheitszeichens (=) und der aktuelle Wert des name Kennung wird auf der rechten Seite. Es sollte keine Leerzeichen vorhanden Vor oder nach dem Gleichheitszeichen.

Hinweis: Wenn es mehr als eine Portion Zeichenfolge mit dem Namen passenden Parameter name, IndexOfName gibt die Position der ersten solchen String.

Nach dem Beispiel geht die Zeichenfolgen in der Memo-Steuerelement Zeichenfolgen in Box Enthalten in der Liste. Wenn eine Zeichenfolge in das Memo ist von der Form Name = Wert und der Name también Box Enthalten in der Liste Wert STI-Wert ist zu ersetzen durch das Listenfeld.

 void __fastcall TForm1:: Button1Click (TObject * Sender)
{
int P, DI;
AnsiString S;
for (int i = 0; i <= ListBox1-> Artikel-> Count - 1; i + +) {
S = ListBox1-> Items-> Strings [i];
P = S. Pos ("=");
if (P> 1) {
DI = Memo1-> Lines-> IndexOfName (AnsiString (S. SubString (1, P - 1)));
if (ID> -1)
Memo1-> Lines-> Strings [di] = S;
}
}
} 

IndexOfObject
Gibt den Index des ersten Strings in der Liste mit einem bestimmten Objekt zugeordnet ist.

int __fastcall IndexOfObject (System:: TObject * AObject)

Beschreibung

Call IndexOfObject Auffinden der erste String in der Liste AObject findet mit dem Objekt. Geben Sie das gewünschte Objekt zu finden AObject als der Wert des Parameters. IndexOfObject gibt die 0-basierte Index des Strings und Objekt. Wenn das Objekt nicht Associated mit einem der Strings, IndexOfObject -1 zurück.

Der folgende Code ist MyObject Bestimmt, ob das erste Objekt in MyStringList.

 void __fastcall TForm1:: Button1Click (TObject * Sender)
{
if (ListBox1-> Artikel-> IndexOfObject (MyObject) == 0)
ShowMessage ("foo");
} 

Legen Sie
Legen Sie eine Zeichenkette an einer bestimmten Position.

 virtual void __fastcall einfügen (int index, const System:: AnsiString S) = 0;
Memo1-> Lines-> Einfügen (2, "Hallo"); 

Beschreibung

Nachkommen von TStrings Implementieren eines Insert-Methode zum Index fügen Sie die Zeichenfolge S in die Liste in der angegebenen Position durch. Wenn Index 0, String ist die Liste eingefügt am Beginn der. Wenn Index 1, string ist die Liste zu setzen in der zweiten Position der, und so weiter.

Alle Methoden, die Saiten in die Liste der Insert-Methode verwenden, um die Zeichenfolge hinzuzufügen.

Wenn der String hat eine zugehörige Objekt verwenden Sie die Methode InsertObject statt.

InsertObject
Legen Sie eine Zeichenkette an einer bestimmten Position in der Liste, und ordnet diese mit einem Gegenstand.

 void __fastcall InsertObject (int index, const System:: AnsiString S, System:: TObject * AObject) 

Beschreibung

Rufen Sie zum Einfügen der InsertObject String s in der Liste an der Position Kennzeichnung durch Index und verbinden sie mit dem Objekt AObject. Wenn Index 0, String ist die Liste eingefügt am Beginn der. Wenn Index 1, string ist die Liste zu setzen in der zweiten Position der, und so weiter.

Der folgende Code fügt die Komponenten von Form1 in die erste Position der Liste der Memo1 Lines.

 void __fastcall TForm1:: Button1Click (TObject * Sender)
{
for (int i = 0; i <Form1-> ComponentCount-1, i + +)
Memo1-> Lines-> InsertObject (0, Form1-> Components [i] -> Name, this);
} 

LoadFromFile

Füllen Sie die Liste der Zeilen aus einer Textdatei.

 virtual void __fastcall LoadFromFile (const System:: AnsiString filename); 

Beschreibung

Call LoadFromFile füllen die Liste der TStrings Objekt aus der Datei FileName angegebene durch. Jede Zeile in der Datei, die als Zeichen Anzeige durch Wagenrücklauf oder Zeilenvorschub ist angehängt als String in der.

In diesem Beispiel wird ein Memo und eine Schaltfläche auf einem Formular. Wenn der Button angeklickt wird das Memo ist Datei gefüllt mit dem Inhalt der.

 void __fastcall TForm1:: Button1Click (TObject * Sender)
{
Memo1-> Lines-> LoadFromFile (Unit1.cpp ");
} 

LoadFromStream
Füllen Sie die Liste der Zeilen Text lesen Konsole aus dem.

 virtual void __fastcall LoadFromStream (TStream * stream); 

Beschreibung

Call LoadFromStream füllen die Liste der TStrings Objekt aus dem Stream angegeben von Stream. Der Text Stream gelesen wird aus dem Zeichen analysiert Zeichenketten in Getrennt durch Wagenrücklauf oder Zeilenvorschub. So liest LoadFromStream den Wert der Eigenschaft Text.

Wenn der Stream ist ein Stream-Datei, wird LoadFromStream dasselbe wie LoadFromFile, mit Ausnahme der Anwendung erstellen müssen und zerstören die Datei-Stream.

In diesem Beispiel wird ein Memo und eine Schaltfläche auf einem Formular. Wenn der Button angeklickt wird das Memo der Datei gefüllt ist mit dem Inhalt und dann in einer neuen Datei gespeichert.

 void __fastcall TForm1:: Button1Click (TObject * Sender)
{
Memo1-> Lines-> LoadFromStream (& TFileStream (Unit1.cpp "fmOpenRead));
Memo1-> Lines-> SaveToStream (& TFileStream (Unit2.cpp "fmOpenWrite));
} 

Bewegen
Ändern Sie die Position eines Strings in der Liste.

 virtual void __fastcall Move (int CurIndex, int NewIndex)
Memo1-> Lines-> Move (2,4), / / Die Kette von Position 2 bis 4 

Beschreibung

Verwenden Sie zum Verschieben NewIndex bewegen Sie die Zeichenfolge an Position CurIndex es so, dass die Position besetzte. Die Positionen werden wie 0-basierte Indizes. Zum Beispiel folgende Codezeile verschiebt die die Zeichenfolge in der ersten Position in die letzte Position.

 MyStringsObject-> Move (0, MyStringsObject-> Count - 1); 

Wenn der String hat eine zugehörige Objekt, das Objekt Position im Zusammenhang mit der Zeichenfolge Remains in STIs neu.

In diesem Beispiel wird ein Listenfeld und eine Schaltfläche auf einem Formular. Die Liste enthält Begriffe, wenn das Formular angezeigt wird. Wenn der Benutzer auf die Schaltfläche klickt, das fünfte Element in der Liste Feld bewegt wird, um den Anfang der Liste angezeigt:

 void __fastcall TForm1:: Button1Click (TObject * Sender)
{
ListBox1-> Items-> Move (4,0);
}
//------------------------------------------------ ---------------------------
void __fastcall TForm1:: FormCreate (TObject * Sender)
{
for (int i = 0; i <10; i + +)
ListBox1-> Artikel-> Append ("New String" + AnsiString (i));
} 

SaveToFile
Speichern Sie die Zeichenfolgen in der Dateiliste.

 virtual void __fastcall SaveToFile (const System:: AnsiString filename); 

Beschreibung

Call SaveToFile zur Rettung der Strings in der Liste, um die Datei FileName angegebene durch. Jeder String in der Liste ist geschrieben in einer separaten Zeile in der.

In diesem Beispiel wird ein Memo und eine Schaltfläche auf einem Formular. Wenn der Button angeklickt wird das Memo der Datei gefüllt ist mit dem Inhalt und dann in einer neuen Datei gespeichert.

 void __fastcall TForm1:: Button1Click (TObject * Sender)
{
Memo1-> Lines-> LoadFromFile (Unit1.cpp ");
Memo1-> Lines-> SaveToFile (Unit2.cpp ");
} 

SaveToStream
Geben Sie den Text-Eigenschaft Wert in einem Stream-Objekt.

 virtual void __fastcall SaveToStream (TStream * stream); 

Beschreibung

Rufen Sie an SaveToStream Parameter speichern Sie die Strings in der Liste auf den Stream angegeben durch den Stream. SaveToStream schreibt die Saiten begrenzt durch Wagenrücklauf, Zeilenvorschub-Paare. Wenn der Stream ist ein Stream-Datei, wird SaveToStream dasselbe wie SaveToFile, mit Ausnahme der Anwendung erstellen müssen und zerstören die Datei-Stream.

In diesem Beispiel wird ein Memo und eine Schaltfläche auf einem Formular. Wenn der Button angeklickt wird das Memo der Datei gefüllt ist mit dem Inhalt und dann in einer neuen Datei gespeichert.

 void __fastcall TForm1:: Button1Click (TObject * Sender)
{
Memo1-> Lines-> LoadFromStream (& TFileStream (Unit1.cpp "fmOpenRead));
Memo1-> Lines-> SaveToStream (& TFileStream (Unit2.cpp "fmOpenWrite));
} 

SetText
Starten Sie die Liste mit dem angegebenen Textinhalt.

 __fastcall virtual void SetText (char * text); 

Beschreibung

Call SetText als Ersatz für die Liste mit den Streichern des festgelegte Text-Parameter. SetText fügt Strings nacheinander in die Liste mit Hilfe der Wagenrücklauf oder Zeilenvorschub Zeichen als Trennzeichen in Text anzeigen, wenn eine Zeichenfolge einen neuen.

TStrings
Constructor. Erstellt ein neues TStrings.

 __fastcall TStrings (void): Klassen:: TPersistent () {} 

Beschreibung

Erstellen Sie keine Instanzen von TStrings. Methoden TStrings Verlassen Sie sich auf rein virtuelle Methoden, die überschrieben müssen in Nachkomme Objekte.