also es gibt da verschiedene Möglichkeiten:
Neue Beiträge:
1. über die STrings methode
ValueListEditor1.Strings.Strings[0] := 'Value=Wert';
Strings[0] <--- 1. zeile
Value <--- 1. Spalte
Wert <--- 2. Spalte
2. Über die die Methode
ValueListEditor1.InsertRow('Value','Wert',TRUE);
Zitat:
function InsertRow(const KeyName, Value: string; Append: Boolean): Integer;
Beschreibung
Rufen Sie InsertRow auf, um ein Namens-/Wertepaar im Wertelisteneditor und im bearbeiteten TStrings-Objekt hinzuzufügen.
InsertRow fügt einen String im Format
KeyName=Value
in die Eigenschaft Strings ein und aktualisiert die Anzeige, damit die Änderung berücksichtigt wird.
Ist die aktuelle Zeile im Wertelisteneditor leer (keinen Namens- oder Wertebestandteil), weist InsertRow der aktuellen Zeile die neuen Werte aus KeyName und Value zu. Andernfalls wird der neue String hinter der aktuell ausgewählten Zeile eingefügt, wenn der Parameter Append den Wert True hat. Hat Append den Wert False, wird der neue String vor der aktuell ausgewählten Zeile eingefügt.
Um den Wert auszulesen gibt es auch wieder 2 möglichkeiten:
1. du kennst den namen des Keys (1.Spalte):
Zitat:
Die Eigenschaft Values listet die Strings zu jedem Wert in der Wertespalte auf.
Delphi-Syntax:
property Values[const Key: string]: string;
Beschreibung
Verwenden Sie Values, um auf den Wert mit dem angegebenen Namen in der ersten Spalte zuzugreifen. Key gibt einen String an, der in der ersten Spalte des Wertelisteneditors angezeigt wird. Values gibt den zugehörigen String in der zweiten Spalte (Value) an.
Verwenden Sie die Eigenschaft Keys, um auf die Strings in der Namensspalte zuzugreifen. Mit der Eigenschaft Strings können Sie auf die zugrundeliegende Stringliste zugreifen.
Hinweis: Wenn Sie Values einen Wert zuweisen, während Key einen Namen enthält, der nicht in der Liste enthalten ist, wird Strings ein neuer String und dem Wertelisteneditor eine neue Zeile hinzugefügt.
2. du kennst nur Die Zeile dann kennst nur die Zeile dnan kannst du copy und pos benutzen:
Delphi-Quellcode:
Line := ValueListEditor1.Strings.Strings[0];
if pos('=',Line) <> 0 then begin
Wert := copy(Line,pos('=',Line)+1,length(Line));
Value := copy(Line,1,pos('=',Line)+1);
end;
Am besten schaust du das nächste mal in die Hilfe !
einfach F1 auf der Control drücken =)
Ich hoffe ich konnte dir damit helfen !
Ceers