| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
Rana Lt JG


Registrado: 02 Dic 2002Mensajes: 62
|
Publicado: Vie 31 Ene, 2003 9:27 pm Asunto: Problema con el TColorDialog |
|
|
Hola a todos, tengo el siguiente problema,
necesito conseguir el código hexadecimal del color elegido por el TColorDialog, _________________ Gracias de Antemano
<---------------------->
Saludos RANA
''''''''
(0)(0)
-o-o-o--(_)--0-0-0-
<----------------------> |
|
| Volver arriba |
|
 |
R. Porcar Site Admin

Registrado: 08 Ago 2002Mensajes: 113Ubicación: Castellón (España)
|
Publicado: Sab 01 Feb, 2003 1:18 am Asunto: |
|
|
| Código: | void __fastcall TForm1::Button1Click(TObject *Sender)
{
if (ColorDialog1->Execute())
{
int RGB = ColorToRGB(ColorDialog1->Color);
TVarRec args[3] = {GetRValue(RGB), GetGValue(RGB), GetBValue(RGB)};
Label1->Caption = Format("#%.2x%.2x%.2x", args, 3);
}
} |
|
|
| Volver arriba |
|
 |
|