Erzeugen von Namens-Wertepaaren in Listbox

[Christian123]

Hallo!
Ich habe ein kleines aber feines Problem, bei dem die Hilfe in Delphi 7 leider nicht weiterhilft.
Folgendes soll realisiert werden:
Beispiel:

Sichtbarer Eintrag in der Liste z. B. "Meier"
Daraus ergibt sich für den Ersten Eintrag der Index 0.
Jetzt möchte ich aber für den 1. Eintrag eine Value Eigenschaft hinterlegen, so dass nach Klick auf die Listbox z.B. der Beruf aus der Value Eigenschaft ausgelesen wird, z.B. "Programmierer".

Das Eintragen von Werten in eine Listbox ist nicht das Problem, sondern die Frage, wie ich den "maskierten" Wert "Programmierer" wieder auslesen kann. Wie erzeuge ich also das Wertepaar "Meier / Programmierer" und lese es über die Eigenschaften wieder aus(wahrscheinlich irgendwie mit TStrings).
Die Methoden wie Klick auf Listbox und evtl. Messageboxen für die Ausgabe von Daten sind hier nicht(!!) von Interesse, sondern wirklich, wahrscheinlich die 2-3 Zeilen, wie man für diese Fragestellung vorghehen muss.

NameValueSeparator war ein Hinweis in der Hilfe, der mich aber auch nicht weiter brachte.
Vielen Dank für die Hilfe!!!!!!