Sign in to follow this  
Followers 0
Jikoo

Problem to choose color with _ChooseColor [SOLVED]

4 posts in this topic

#1 ·  Posted (edited)

Hello,

Could you tell me why, when I click on a button, the transmitted color is not the same. It work well on the first and the last one but not on the second and the third.

Click on a button to see. Thank you.

#include <GUIConstants.au3>
#include <Misc.au3>

Opt('MustDeclareVars', 1)

Local $msg, $hGUI
Local $buttonColor1, $buttonColor2, $buttonColor3, $buttonColor4
Local $color1 = 0xF000FF
Local $color2 = 0x9999CC
Local $color3 = 0xAA0000
Local $color4 = 0xAC00A9
   
$hGUI = GUICreate("Choose Color Hex", 200, 300)
    
$buttonColor1 = GUICtrlCreateButton("0x" & Hex($color1, 6), 20, 20, 100, 40)
GUICtrlSetBkColor(-1, $color1)
        
$buttonColor2 = GUICtrlCreateButton("0x" & Hex($color2, 6), 20, 70, 100, 40)
GUICtrlSetBkColor(-1, $color2)
        
$buttonColor3 = GUICtrlCreateButton("0x" & Hex($color3, 6), 20, 120, 100, 40)
GUICtrlSetBkColor(-1, $color3)
        
$buttonColor4 = GUICtrlCreateButton("0x" & Hex($color4, 6), 20, 170, 100, 40)
GUICtrlSetBkColor(-1, $color4)
        
GUISetState()


   While 1
        $msg = GUIGetMsg()
        Switch $msg
            Case $GUI_EVENT_CLOSE
                ExitLoop
                
            Case $buttonColor1
                _ChooseColor(2, $color1, 0)
                
            Case $buttonColor2
                _ChooseColor(2, $color2, 0)
                
            Case $buttonColor3
                _ChooseColor(2, $color3, 0)
                
            Case $buttonColor4
                _ChooseColor(2, $color4, 0)
                      
      EndSwitch
WEnd
Edited by Jikoo

My projects : GCS Search 1.07 (GUI Control Styles Search)* Multilingual tool to help about the old scripts, with a dynamic menu.* Easy way to find missing Include files in old scripts downloaded from forums !* Famous Monoceres script added and improved (visual, drag and drop, automatic)* There is an interactive color converter with palettes too, for fun !The best way to start Autoit3 development (for newbies).

Share this post


Link to post
Share on other sites



Hello,

Could you tell me why, when I click on a button, the transmitted color is not the same. It work well on the first and the last one but not on the second and the third.

Click on a button to see. Thank you.

#include <GUIConstants.au3>
#include <Misc.au3>

Opt('MustDeclareVars', 1)

Local $msg, $hGUI
Local $buttonColor1, $buttonColor2, $buttonColor3, $buttonColor4
Local $color1 = 0xF000FF
Local $color2 = 0x9999CC
Local $color3 = 0xAA0000
Local $color4 = 0xAC00A9
   
$hGUI = GUICreate("Choose Color Hex", 200, 300)
    
$buttonColor1 = GUICtrlCreateButton("0x" & Hex($color1, 6), 20, 20, 100, 40)
GUICtrlSetBkColor(-1, $color1)
        
$buttonColor2 = GUICtrlCreateButton("0x" & Hex($color2, 6), 20, 70, 100, 40)
GUICtrlSetBkColor(-1, $color2)
        
$buttonColor3 = GUICtrlCreateButton("0x" & Hex($color3, 6), 20, 120, 100, 40)
GUICtrlSetBkColor(-1, $color3)
        
$buttonColor4 = GUICtrlCreateButton("0x" & Hex($color4, 6), 20, 170, 100, 40)
GUICtrlSetBkColor(-1, $color4)
        
GUISetState()


   While 1
        $msg = GUIGetMsg()
        Switch $msg
            Case $GUI_EVENT_CLOSE
                ExitLoop
                
            Case $buttonColor1
                _ChooseColor(2, $color1, 0)
                
            Case $buttonColor2
                _ChooseColor(2, $color2, 0)
                
            Case $buttonColor3
                _ChooseColor(2, $color3, 0)
                
            Case $buttonColor4
                _ChooseColor(2, $color4, 0)
                      
      EndSwitch
WEnd
#include <GUIConstants.au3>
#include <Misc.au3>

Opt('MustDeclareVars', 1)

Local $msg, $hGUI
Local $buttonColor1, $buttonColor2, $buttonColor3, $buttonColor4
Local $color1 = 0xF000FF
Local $color2 = 0x9999CC
Local $color3 = 0xAA0000
Local $color4 = 0xAC00A9
   
$hGUI = GUICreate("Choose Color Hex", 200, 300)
   
$buttonColor1 = GUICtrlCreateButton("0x" & Hex($color1, 6), 20, 20, 100, 40)
GUICtrlSetBkColor(-1, $color1)
       
$buttonColor2 = GUICtrlCreateButton("0x" & Hex($color2, 6), 20, 70, 100, 40)
GUICtrlSetBkColor(-1, $color2)
       
$buttonColor3 = GUICtrlCreateButton("0x" & Hex($color3, 6), 20, 120, 100, 40)
GUICtrlSetBkColor(-1, $color3)
       
$buttonColor4 = GUICtrlCreateButton("0x" & Hex($color4, 6), 20, 170, 100, 40)
GUICtrlSetBkColor(-1, $color4)
       
GUISetState()


While 1
    $msg = GUIGetMsg()
        Switch $msg
            Case $GUI_EVENT_CLOSE
                ExitLoop
               
            Case $buttonColor1
                _ChooseColor(2, $color1, 2)
               
            Case $buttonColor2
                _ChooseColor(2, $color2, 2)
               
            Case $buttonColor3
                _ChooseColor(2, $color3, 2)
               
            Case $buttonColor4
                _ChooseColor(2, $color4, 2)
                      
      EndSwitch
WEnd

When the words fail... music speaks

Share this post


Link to post
Share on other sites

Thanks a lot Andreik, :P

I understood. It was the RGB mode.

From help AutoIt :

$iRefType Type of $iColorRef passed in, valid values:

0 - COLORREF rgbcolor

1 - BGR hex

2 - RGB hex


My projects : GCS Search 1.07 (GUI Control Styles Search)* Multilingual tool to help about the old scripts, with a dynamic menu.* Easy way to find missing Include files in old scripts downloaded from forums !* Famous Monoceres script added and improved (visual, drag and drop, automatic)* There is an interactive color converter with palettes too, for fun !The best way to start Autoit3 development (for newbies).

Share this post


Link to post
Share on other sites

Thanks a lot Andreik, :P

I understood. It was the RGB mode.

From help AutoIt :

$iRefType Type of $iColorRef passed in, valid values:

0 - COLORREF rgbcolor

1 - BGR hex

2 - RGB hex

Yes. $iColorRef type in your case was RGB Hex.


When the words fail... music speaks

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0