Listbox zweiten Wert pro Eintrag hinterlegen

[seppelon]

Das ist ja total cool - funktioniert soweit astrein
Mal so rein aus Interesse, wäre es auch möglich noch mehr Werte zu hinterlegen bzw. z. B. Strings zu hinterlegen?

Danke liebe Delphi-Pro's