funcion , listbox y conversion

[beginner01]

Empezado por coej

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...

hay otras maneras de hacerlo.
prueba agregando en el evento onclick de el listbox esto.

Código Delphi [-]
 
a:=listbox1.items.strings[listbox1.itemindex];
 form1.caption:=a;

saludos.