Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
GetColor
Message
General information
Forum:
Visual FoxPro
Category:
Other
Title:
Miscellaneous
Thread ID:
00700557
Message ID:
00700572
Views:
52
I read somewhere that Homer was not a person but a group of individuals.
I'm wondering if you are just the facade of a bunch of gurus. :)
Just a joke...
Thanks a lot Sergey.


>You can use Common Dialog Control.
loForm = CREATEOBJECT("Form")
>loForm.Left = 100   && Set Dialog Position by positioning the form
>loForm.Top = 100    && Set Dialog Position
>loForm.ADDOBJECT("oCDC", "GetColorEx")
>loForm.oCDC.Flags = 2+1   && Define Custom Colors section + Allow to set Inital Color.
>loForm.oCDC.Color = RGB(0,255,0)   && Set Initial Color
>loForm.oCDC.ShowColor()
>lnColor = loForm.oCDC.Color
>
>DEFINE CLASS GetColorEx AS OleControl
>	OleClass = "MSComDlg.CommonDialog"
>ENDDEFINE
>
>
>>Hi All,
>>
>>I'm allowing my users to change some background colors in an application, I'm using the GetColor() function and everything works well. But...
>>
>>What I want is to display the color picker window with the "Define custom colors" button clicked so it shows the whole palette of colors available.
>>Is that possible?
>>I attempted using the keyboard command but it is klugdy and won't work in all cases.
>>Is there in Windows or another color picker available?

...Y soy feliz, bien feliz, asi lo grito;
Mira, que el mundo sepa, que se sepa:
Soy feliz....                       

...And I'm happy, quite happy, so do I yell it;
Look, so the world knows it, so be known:
I'm happy...
 

Ismael Rivera "Oye cosita linda"
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform