Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
20 most used distinct visible colors
Message
 
 
À
07/12/2006 02:54:29
Suhas Hegde
Dental Surgeon
Sirsi, Inde
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 6 SP5
Divers
Thread ID:
01175481
Message ID:
01175620
Vues:
8
I think you are asking an unanswerable question. How could anyone possibly know what the 20 most used colors are?

My opinion regarding colors comes from a completely different direction. Namely, the developer should control colors as little as possible and let the user see whatever colors they have set up in Windows. If someone likes pale blue text, why should I insist on red? To me that is arrogant.


>Hi,
>
>I have the converts from nemeric to RGB courtesy UT posts
>
>I wanted to know 20 most used colors in RGB format distinct colors not shades
>
>thanx
>
>suhashegde
>
>
>
>>To find the rgb values for any color:
>>
?color2rgb(GetColor())
>>Here's my color2rgb function. It's a little "overkill" for your specific need, since it also can return only one color component, like ?color2rgb(16711808,'R') which will only give the red value. I need this functionality in some programs, so I created a generic function.
>>
>>Function color2rgb
>>  Lparameters lnColor,lcColor
>>  Local lnRed,lnGreen,lnBlue,lxReturn
>>  lnRed = Mod(lnColor, 256)
>>  lnGreen = Mod(Bitrshift(lnColor, 8), 256)
>>  lnBlue = Mod(Bitrshift(lnColor, 16), 256)
>>  Do Case
>>    Case Pcount()=1
>>      lxReturn=n2c(lnRed)+','+n2c(lnGreen)+','+n2c(lnBlue)
>>    Case Upper(lcColor)='R'
>>      lxReturn=lnRed
>>    Case Upper(lcColor)='G'
>>      lxReturn=lnGreen
>>    Case Upper(lcColor)='B'
>>      lxReturn=lnBlue
>>    Otherwise
>>      lxReturn=-1
>>  Endcase
>>Return lxReturn
>>NB! Note that you can use the (numeric) return value from getcolor() almost anywhere, so there's really no reason to convert to RGB.
>>
>>>hi,
>>>
>>>i need most commonly used 20 distint colors other than black and white
>>>
>>>CAn some1 list it please in RGB() format ?
>>>
>>>tia
>>>
>>>suhashegde
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform