Stringliste indexOfName IndexofValue

[bernhard_LA]

meine Stringliste hat folgenden Inhalt

key1=Value1
keyA=Value2
keyV=Value3
keyX=Value4

Ich möchte in meine Liste nur dann ein neues Paar "key=value" einfügen, wenn der value nicht schon exitiert.
StringList.IndexofName hilft mir nicht, eine Funktion IndexOfvalue würde ich benötigen

Gibt es hier schon etwas ?

[Neutral General]

Ich weiß nicht wie das bei dir aussieht aber kannst du Key und Value nicht einfach tauschen?

[Dalai]

Wie wär's mit TStringList.Values? Ist der gesuchte Wert nicht vorhanden, gibt das einen Leerstring zurück. Sofern also deine Werte nicht leer sind, müsste das doch sein, was du suchst.

Grüße
Dalai

[Neutral General]

Values gibt nur den Wert zu einem Key. Damit kriegt man nicht raus ob IRGENDEIN Key einen bestimmten Value hat.

[bernhard_LA]

tauschen von Key und Value geht leider nicht muss mich hier an ein festes Ausgabeformat halten,
will halt eine Suche ob ein Substring vorhanden ist vor jedem Einfügen vermeiden, die Listen können sehr lang werden

[Dalai]

Tja, eine simple Variante ist, eine Kopie der Funktion IndexOfName zu machen und sie zu einem IndexOfValue umzuarbeiten. Ob man das dann als Ableitung von TStrings/TStringList macht oder ob das auch als Helper möglich ist, weiß ich nicht (nie benutzt).

Grüße
Dalai

[hoika]

Hallo,

Zitat:

muss mich hier an ein festes Ausgabeformat halten

Das mag für die Ausgabe stimmen, aber intern kannst du das doch umdrehen (eigene StringList).

Korrektur

Zitat:

nur dann ein neues Paar "key=value" einfügen, wenn der value nicht schon exitiert.

IndexOf("key=value")=-1 -> existiert noch nicht

Aso die ganz normale Suche benutzen.

[Neutral General]

Zitat:

Zitat von hoika (Beitrag 1454379)

IndexOf("key=value")=-1 -> existiert noch nicht

Funktioniert nicht. Was ist wenn key2=value existiert? Das kannst du damit nicht abfragen.

[Jumpy]

TDictionary verwenden?

[Uwe Raabe]

Zitat:

Zitat von Neutral General (Beitrag 1454374)

Values gibt nur den Wert zu einem Key. Damit kriegt man nicht raus ob IRGENDEIN Key einen bestimmten Value hat.

Du könntest über alle Einträge iterieren und

Delphi-Quellcode:

ValueFromIndex

prüfen.