esther
09 de Septiembre del 2003

Hola, necesito saber como puedo establecer la propiedad backcolor de una label a partir de un número que recupero de la Base de Datos.
Si directamente le doy el número que me devuelve la base de datos, me indica un color diferente al que estoy buscando.

Muchas gracias

Juan
09 de Septiembre del 2003

Es normal porque la propiedad backcolor es un tipo
Long que almacena la información de un color RGB de 24 BITS.
Ahora la pregunta es ¿Qué guarda la base de datos?,
evidentemente no es un color RGB de 24 BITS, puede
que sea el índice en una paleta de colores o un color
RGB codificado con 16 BITS.

En conclusión, para responder a tu pregunta primero
debes aclarar qué estás guardando en la base de datos.

Esther
09 de Septiembre del 2003

Hola Juan, gracias por contestar, loq ue cuarda es el índice de la paleta de colores, o sea un número que va del 0 al 255.

Gracias por todo

Juan
09 de Septiembre del 2003

Entonces lo que debes asignar a la propiedad BackColor
no es ese índice sino el elemento de la paleta que corresponde
a ese índice, algo así:

objeto.BackColor = Paleta(indice)

en lugar de:

objeto.BackColor = indice

oscar
09 de Septiembre del 2003

Label1.backcolor=QBColor (15)
Label1.backcolor=rgb(255,0,45)

La funcio QBColor nesecita un integer de 0 a 15 sin pasarse
La funcion Rgb(red "rojo",Green"gris",Blue"Azul") necesita tres parametros integer separados por coma entre 0 y 255

Rgb(255,0,0) 'Todo Rojo
Rgb(0,255,0) 'Todo Gris
Rgb(0,0,255) 'Todo Azul

Bueno espero que te sirva, ingeniatelas pa pasar un valor

arregelago=cint(2555 / 256)

rgb(arreglado , 0 , 255 )

suerte