Comunidad Gambas-es

tengo problemas para definir un color distinto para cada elemento de una lista alojada en un listBox, es decir, imaginaos que quiero colocar los nombres de una agenda de contactos en un listbox pero quiero que represente el nombre en color azul si se trata de un hombre y en color rojo si es mujer.

la rutina sería algo así.

iContador = 0
WHILE iNumRegistros > iContador
ListBox1.Add(ModConexion.rs1!Nombre, iContador)
IF ModConexion.rs1!Sexo = "H" THEN
ListBox1[iContador].Foreground = Color.Blue
ELSE
ListBox1[iContador].Foreground = Color.Red
ENDIF
ModConexion.rs1.MoveNext
INC iContador
WEND

En este caso siempre me sale el siguiente error:

Unknown symbol 'Color' in class 'ListBoxItem'.

el programa para en la línea
ListBox1[iContador].Foreground = Color.Blue

¿Alguien sabe como resolver el tema.

gracias.

Lamentablemente, el control ListBox no dispone de esa propiedad para los ítems. Como alternativa, puedes usar el control ListView, que tampoco la tiene, pero en cambio permite insertar una imagen o icono descriptivo al lado del texto.

Para hacer lo que tú planteas, yo terminé usando un GridView, que sí permite modificar los colores para cada celda, tanto el Background como Foreground, pero necesitas reescribir el código para adaptarlo a sus propios métodos y propiedades.

Saludos

Mil gracias.

Hola!.

Lo mismo me ocurrió.Estaba haciendo un ejercicio de este tutorial:

http://gambaslinux.files.wordpress....e-gambas_21.pdf

En la pagina 5, punto 4.

O no entendí lo que quiso decir el autor del tutorial .O era cambiar solo el color en la caja de texto.

VB tampoco puede hacer eso.

P.d, siempre se aprende algo nuevo.