Ver Mensaje Individual
  #1  
Antiguo 08-10-2004
Avatar de gluglu
[gluglu] gluglu is offline
Miembro Premium
 
Registrado: sep 2004
Ubicación: Málaga - España
Posts: 1.455
Reputación: 23
gluglu Va por buen camino
Color en un campo almacenado

He logrado guardar un color elegido en un campo de una base de datos.
Código Delphi [-]
ColorDialog1.Color := Shape1.Brush.Color;
ColorDialog1.Execute;
Shape1.Brush.Color := ColorDialog1.Color;
IBQuery1.Edit;
IBQuery1.FieldByName('COLOR').Value := ColorDialog1.Color;
IBQuery1.Post;
Pero ahora quiero hacer la función inversa, recuperarlo desde la base de datos y asignar ese color al Shape1.

El campo COLOR de la BD es tipo caracter y me graba un String correspondiente al valor decimal del Hexadecimal del Color correspondiente. Lo que no sé es como convertir de nuevo ese string decimal en un valor que le pueda asignar directamente al Shape1.Brush.Color.

Gracias por vuestra ayuda.
Responder Con Cita