funcion , listbox y conversion

[coej]

HOla de nuevo Roman, si que lo tengo puesto
a:= TForm1.SelText(ListBox1);

Haber si me estoy explicando mal
Tengo un formulario Form1, un listbox ListBox1, y le pongo 3 items, rojo, verde azul
y quiero que cuando se marque en uno de ellos(se seleccione), guarde en la variable a el valor (rojo por ejemplo), y lo enseñe en un texto en el mismo formulario, algo asi quiero conseguir, gracias de nuevo...