Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 18-02-2005
Avatar de @-Soft
@-Soft @-Soft is offline
Miembro
 
Registrado: may 2003
Ubicación: Santo Domingo, Rep. Dom.
Posts: 200
Poder: 22
@-Soft Va por buen camino
Talking obtener el valor de un color de un TColorBox

hola


necesito obtener el valor de un color extrayendolo de un TColoBox y pasarlo a un campo (pero no se que formato string, varchar, etc.) para almacenarlo en una tabla (paradox) y luego de esto pasarle ese valor a la propiedad Color del formulario.

El proposito es que se pueda cambiar el color del formulario cuantas veces el usuario desee.

Salu2
__________________
Ivan Lora

http://www.arrobasoft.da.ru

Valientes son aquellas personas que triunfan donde otros fracasan.
Bienaventurado los que nada esperan porque jamas seran defraudados.
Responder Con Cita
  #2  
Antiguo 18-02-2005
Ricardojosep Ricardojosep is offline
Miembro
 
Registrado: sep 2003
Ubicación: Sgo del estero (Argentina)
Posts: 75
Poder: 21
Ricardojosep Va por buen camino
Hola @-Soft

Pues puedes obtener asi el nombre del color:

ShowMessage(ColorBox1.ColorNames[ColorBox1.ItemIndex]);

ColorNames te da un valor String, entonces lo unico que tienes que hacer ahora es ingresarlo a la base de datos como tipo String. Y cuando lo quieres Utilizar vas a tener que hacer asi:

Form1.Color := StringToColor(NombreDeDase.FieldByName('Color').AsString);

y listo ya tienes el color que quieres. Observa que en el ejemplo que te doy, se cambia el color del Form dependiendo que color se haya seleccionado de la Base.

Saludos, Suerte.

Ricardo.
__________________
La amistad es la union de dos almas para formar una sola.
Responder Con Cita
  #3  
Antiguo 19-02-2005
Avatar de @-Soft
@-Soft @-Soft is offline
Miembro
 
Registrado: may 2003
Ubicación: Santo Domingo, Rep. Dom.
Posts: 200
Poder: 22
@-Soft Va por buen camino
Muuuchas gracias
__________________
Ivan Lora

http://www.arrobasoft.da.ru

Valientes son aquellas personas que triunfan donde otros fracasan.
Bienaventurado los que nada esperan porque jamas seran defraudados.
Responder Con Cita
  #4  
Antiguo 20-02-2005
Ricardojosep Ricardojosep is offline
Miembro
 
Registrado: sep 2003
Ubicación: Sgo del estero (Argentina)
Posts: 75
Poder: 21
Ricardojosep Va por buen camino
Cita:
Empezado por @-Soft
Muuuchas gracias
De nada amigo @-Soft

Saludos.

Ricardo.
__________________
La amistad es la union de dos almas para formar una sola.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 22:55:21.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi