color pickin chooser

corz · September 23, 2007

introducing... corz color pickin chooser..

Posted Image

It's a desktop application, it's a pure AutoIt include, it's all yours! It's like this..

Features (yes, I prepared this earlier!)..

User-definable color picking images..

    All available from a handy context (right-click) menu.

    Import images as easily as a drag & drop.

    Comes with a selection of sample pickers.

    And more!


Luminance gradient selection..

    The smoothest gradient selector on planet earth, well, smooth.

    With live luminance facility (F5)


Built-in magnifier..

    With live mag facility (F6)

    Includes "super-mag" for out-of-gui pixel capture.


Live hex tool tips and title bar..

    (or whatever output format you specify)

    Hold down SHIFT to see live color values in your chosen output format,
    with or without prefix, as required.


User-definable color groups..

    You can save colors in any number of color groups.

    Keep all your color schemes in one handy central location. Groups can be
    created, copied, edited and deleted, colors created, renamed, and
    deleted, all from within the gui.


Drag & drop import of color schemes..

    easy export/backup and restore (drag & drop) of color groups.

    share color groups with others, just drag & drop.

    Drag & drop ini files to suck colors from other program's preferences,
    even whole folders of files (non-ini's are ignored)


Palette support (GIMP .gpl and JASC .pal)..

    Export colors as cpc color groups or color palettes.

    Drag and drop palette files onto color pickin chooser to suck out all
    their colors.

    Retain original GIMP palette and color names, even comments.

    color pickin chooser doubles as a capable palette converter.


Full group comments support..

    Color group and Gimp palette comments are retained during all import and
    export functions.

    Attach comments and notes to your color groups, view and edit them, all
    from within color pickin chooser.


All controls are live..

    Everything dynamically updates everything else!


Live hex tool tips and title bar..

    Copy and auto-copy hex color values to the clipboard..

        Rapid color picking in multiple output formats..

        Web RGB
        Autoit RGB
        Autoit BGR
        Visual C++
        Delphi
        RGB Integer
        RGB Float
        HSL (Hue/Saturation/Lightness)
        CMYK (also available "normalized" to percentages)

        With or without prefixes, as required.


Handy hotkeys (and SHIFT-click duplex operation!)


Click the tray icon to show and hide the chooser..

    color pickin chooser will never clutter up your taskbar!


Incorporates access to the Windows system color chooser
    ..if you really must!
 

oodles of hidden tricks and features..

    Plus a handy tips system so you can discover them!

And Much, MUCH more!

I did this originally to use inside my clock, but it works just as well on its own, or inside other AutoIt applications, so feel free to grab the source pack here. Check out the page I'm doing about it, here, and grab a ready-made desktop application (clean and virus free, of course) here.

It's fairly bug-free, though of course I'm to hear about any you might find, or indeed any other comment.

Have fun!

;o)

(or

mofle · October 4, 2007

Hi, it doesn't work in Windows Vista, i just get the error message:

Line -1:

Error: Subscript used with non-Array variable

therks · October 4, 2007

Actually I get the same error.

Just trying to run the exe in the zip. WinXP Home.

Paulie · October 4, 2007

i ran the source in SciTE

Got this:

CODE

C:\Documents and Settings\Admin\Desktop\color thing\corz_essentials.au3(620,26) : WARNING: $GUI_UNCHECKED: possibly used before declaration.

case $GUI_UNCHECKED ; 4

~~~~~~~~~~~~~~~~~~~ ~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_essentials.au3(625,23) : WARNING: $GUI_CHECKED: possibly used before declaration.

return $GUI_CHECKED

~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_essentials.au3(780,42) : WARNING: $ini_path: possibly used before declaration.

if $ssp_x <> "-" then IniWrite($ini_path,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(304,20) : WARNING: $WS_CAPTION: possibly used before declaration.

BitOr($WS_CAPTION,

~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(304,31) : WARNING: $WS_POPUP: possibly used before declaration.

BitOr($WS_CAPTION, $WS_POPUP,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(304,44) : WARNING: $WS_SYSMENU: possibly used before declaration.

BitOr($WS_CAPTION, $WS_POPUP, $WS_SYSMENU,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(304,57) : WARNING: $WS_SIZEBOX: possibly used before declaration.

BitOr($WS_CAPTION, $WS_POPUP, $WS_SYSMENU, $WS_SIZEBOX)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(304,77) : WARNING: $WS_EX_TOOLWINDOW: possibly used before declaration.

BitOr($WS_CAPTION, $WS_POPUP, $WS_SYSMENU, $WS_SIZEBOX), $WS_EX_TOOLWINDOW,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(306,32) : WARNING: $GUI_EVENT_CLOSE: possibly used before declaration.

GUISetOnEvent($GUI_EVENT_CLOSE,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(312,38) : WARNING: $ES_MULTILINE: possibly used before declaration.

BitOr($ES_MULTILINE,

~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(312,51) : WARNING: $WS_VSCROLL: possibly used before declaration.

BitOr($ES_MULTILINE, $WS_VSCROLL)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(313,41) : WARNING: $GUI_DOCKBORDERS: possibly used before declaration.

GUICtrlSetResizing(-1, $GUI_DOCKBORDERS)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(318,38) : WARNING: $GUI_DOCKLEFT: possibly used before declaration.

GUICtrlSetResizing(-1, $GUI_DOCKLEFT+

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(318,54) : WARNING: $GUI_DOCKBOTTOM: possibly used before declaration.

GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKBOTTOM+

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(318,69) : WARNING: $GUI_DOCKWIDTH: possibly used before declaration.

GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKBOTTOM+$GUI_DOCKWIDTH+

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(318,85) : WARNING: $GUI_DOCKHEIGHT: possibly used before declaration.

GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKBOTTOM+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(334,39) : WARNING: $GUI_DOCKRIGHT: possibly used before declaration.

GUICtrlSetResizing(-1, $GUI_DOCKRIGHT+

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(351,36) : WARNING: $GUI_DefButton: possibly used before declaration.

GUICtrlSetState(-1, $GUI_DefButton)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(401,33) : WARNING: $tips_count: possibly used before declaration.

ClipPut($tips_array[$tips_count]

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(401,34) : WARNING: $tips_array: possibly used before declaration.

ClipPut($tips_array[$tips_count])

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(405,23) : WARNING: $gui_tips: possibly used before declaration.

WinSetOnTop($gui_tips,

~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(406,35) : WARNING: $tips_ini_path: possibly used before declaration.

$save_to = IniRead($tips_ini_path,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(406,54) : WARNING: $tips_ini_section: possibly used before declaration.

$save_to = IniRead($tips_ini_path, $tips_ini_section,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_tips.au3(407,118) : WARNING: $tips_name: possibly used before declaration.

$save_file = FileSaveDialog( "Dump ALL the tips to a text file..", $save_to, "text files (*.txt)" , 16 , $tips_name &

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(135,26) : WARNING: $group_names: possibly used before declaration.

if InArray($group_names,

~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(137,39) : WARNING: $combo_custom_groups: possibly used before declaration.

GUICtrlSetData($combo_custom_groups,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(150,35) : WARNING: $cpc_picker_image: possibly used before declaration.

cpc_SwitchImage($cpc_picker_image)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(162,32) : WARNING: $gui_color: possibly used before declaration.

corz_GUIAnimateOpen($gui_color,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(162,45) : WARNING: $cpc_gui_fx: possibly used before declaration.

corz_GUIAnimateOpen($gui_color, $cpc_gui_fx)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(186,18) : WARNING: $cpc_no_tips: possibly used before declaration.

if $cpc_no_tips =

~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(218,41) : WARNING: $pic_color_picker: possibly used before declaration.

if $mouse_info[4] = $pic_color_picker or

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(218,74) : WARNING: $info_dummy: possibly used before declaration.

if $mouse_info[4] = $pic_color_picker or $mouse_info[4] >= $info_dummy then

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(219,73) : WARNING: $label_colorwell: possibly used before declaration.

if $mouse_info[4] = $info_dummy or $mouse_info[4] = $label_colorwell then

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(229,23) : WARNING: $live_luminance: possibly used before declaration.

if $live_luminance =

~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(230,17) : WARNING: $live_mag: possibly used before declaration.

if $live_mag =

~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(232,17) : WARNING: $live_hex: possibly used before declaration.

if $live_hex =

~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(234,65) : WARNING: $cpc_output_mode: possibly used before declaration.

ToolTip(ConvertColorValue($cpc_live_color, $cpc_output_mode,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(234,78) : WARNING: $add_prefix: possibly used before declaration.

ToolTip(ConvertColorValue($cpc_live_color, $cpc_output_mode, $add_prefix)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(251,25) : WARNING: $hold_live_color: possibly used before declaration.

if $hold_live_color =

~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(252,41) : WARNING: $label_live_color: possibly used before declaration.

GUICtrlSetBkColor($label_live_color,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(372,45) : WARNING: $cpc_my_name: possibly used before declaration.

global $gui_color = GUICreate($cpc_my_name &

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(372,64) : WARNING: $cpc_width: possibly used before declaration.

global $gui_color = GUICreate($cpc_my_name & "..", $cpc_width ,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(372,78) : WARNING: $cpc_height: possibly used before declaration.

global $gui_color = GUICreate($cpc_my_name & "..", $cpc_width , $cpc_height ,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(372,87) : WARNING: $cpc_x: possibly used before declaration.

global $gui_color = GUICreate($cpc_my_name & "..", $cpc_width , $cpc_height , $cpc_x ,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(372,95) : WARNING: $cpc_y: possibly used before declaration.

global $gui_color = GUICreate($cpc_my_name & "..", $cpc_width , $cpc_height , $cpc_x , $cpc_y,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(381,73) : WARNING: $cpc_picker_size: possibly used before declaration.

global $pic_color_picker = GUICtrlCreatePic("", 6, 6, $cpc_picker_size ,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(387,87) : WARNING: $cpc_lum_height: possibly used before declaration.

global $check_lumlive = GUICtrlCreateCheckbox("", $cpc_picker_size+5, $cpc_lum_height+

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(425,29) : WARNING: $cpc_mag_top: possibly used before declaration.

GUISetCoord(5, $cpc_mag_top)

~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(472,73) : WARNING: $cpc_my_color: possibly used before declaration.

GUICtrlSetTip(-1, " current output: " & ConvertColorValue($cpc_my_color,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(485,36) : WARNING: $cpc_auto_copy: possibly used before declaration.

GUICtrlSetState(-1, $cpc_auto_copy)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(524,41) : WARNING: $no_colorwells: possibly used before declaration.

global $custom_color_box[$no_colorwells+

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(578,90) : WARNING: $cpc_lum_width: possibly used before declaration.

$grad_bars[$bar] = GuiCtrlCreateLabel("", $cpc_picker_size+10, 4 + $bar, $cpc_lum_width,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(593,41) : WARNING: $cpc_output_modes: possibly used before declaration.

for $i = 0 to uBound($cpc_output_modes)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(594,91) : WARNING: $cpc_menu_output_modes possibly not declared/created yet

$cpc_menu_output_modes[$i] = GUICtrlCreateMenuitem($cpc_output_modes[$i], $cpc_MenuHex)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(665,34) : WARNING: $cpc_on_top: possibly used before declaration.

GUICtrlSetState(-1, $cpc_on_top)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(669,41) : WARNING: $cpc_live_titlebar: possibly used before declaration.

GUICtrlSetState(-1, $cpc_live_titlebar)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(682,37) : WARNING: $gui_fx: possibly used before declaration.

if TrayItemGetText($i) = $gui_fx then

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(688,34) : WARNING: $done_quits: possibly used before declaration.

GUICtrlSetState(-1, $done_quits)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(707,70) : WARNING: $cpc_ini_path: possibly used before declaration.

$cpc_gui_fx = corz_GUIGetFX(TrayItemGetText(@TRAY_ID), $cpc_ini_path,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(715,28) : WARNING: $tips_file: possibly used before declaration.

corz_TipsSystem($tips_file,

~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(715,108) : WARNING: $do_func: possibly used before declaration.

corz_TipsSystem($tips_file, $gui_color, $cpc_ini_path, $cpc_my_name, "color pickin tips", "", "", $do_func)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(729,75) : WARNING: $mag_block: possibly used before declaration.

if $mouse_info[4] = $pic_color_picker or $mouse_info[4] >= $mag_block[0] then

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(732,88) : WARNING: $input_color_name: possibly used before declaration.

if ce_IsPressed(10) then cpc_AddNewColor($cpc_my_color, GUICtrlRead($input_color_name)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(733,39) : WARNING: $grad_bars: possibly used before declaration.

if ($mouse_info[4] >= $grad_bars[1] and

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(746,56) : WARNING: $cpc_live_color: possibly used before declaration.

if $first = false and $cpc_my_color = $cpc_live_color then

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(754,46) : WARNING: $cpc_slider_red: possibly used before declaration.

$red_index = Hex(GUICtrlRead($cpc_slider_red)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(758,50) : WARNING: $cpc_slider_green: possibly used before declaration.

$green_index = Hex(GUICtrlRead($cpc_slider_green)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(762,48) : WARNING: $cpc_slider_blue: possibly used before declaration.

$blue_index = Hex(GUICtrlRead($cpc_slider_blue)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(767,45) : WARNING: $cpc_input_red: possibly used before declaration.

$red_index = Hex(GUICtrlRead($cpc_input_red)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(771,49) : WARNING: $cpc_input_green: possibly used before declaration.

$green_index = Hex(GUICtrlRead($cpc_input_green)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(775,47) : WARNING: $cpc_input_blue: possibly used before declaration.

$blue_index = Hex(GUICtrlRead($cpc_input_blue)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(780,50) : WARNING: $input_hex_in_out: possibly used before declaration.

if cpc_CheckBigHex(GUICtrlRead($input_hex_in_out)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(795,31) : WARNING: $red_index: possibly used before declaration.

$cpc_live_color = $red_index &

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(795,46) : WARNING: $green_index: possibly used before declaration.

$cpc_live_color = $red_index & $green_index &

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(795,59) : WARNING: $blue_index: possibly used before declaration.

$cpc_live_color = $red_index & $green_index & $blue_index

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(824,35) : WARNING: $label_my_color: possibly used before declaration.

GUICtrlSetBkColor($label_my_color,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(836,33) : WARNING: $label_hex_in_out: possibly used before declaration.

GUICtrlSetTip($label_hex_in_out,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(851,33) : WARNING: $cpc_grad_step: possibly used before declaration.

for $i = 2 to $cpc_grad_step

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(874,20) : WARNING: $cpc_last_mag: possibly used before declaration.

if $cpc_last_mag then

~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(892,116) : WARNING: $mag_save_blocks possibly not declared/created yet

$mag_save_blocks[$count+1] = PixelGetColor($MousePos[0]+$iterX, $MousePos[1]+$iterY) ; so we can store it, later

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(903,108) : WARNING: $picker_img_dir: possibly used before declaration.

FileInstall("I:\work\dev\autoit\color pickin chooser\img\picker images\Homer X-Ray.jpg", $picker_img_dir &

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(959,37) : WARNING: $cpc_MenuColorPicker: possibly used before declaration.

GUICtrlDelete($cpc_MenuColorPicker)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1019,38) : WARNING: $cpc_picker_images: possibly used before declaration.

for $s = 1 to $cpc_picker_images[0]

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1021,51) : WARNING: $img_menu_items: possibly used before declaration.

case @GUI_CtrlId = $img_menu_items[$s]

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1036,55) : WARNING: $cpc_uncheck_img_idx: possibly used before declaration.

GUICtrlSetState($img_menu_items[$cpc_uncheck_img_idx]

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1076,59) : WARNING: $cpc_previous_mode: possibly used before declaration.

GUICtrlSetState($cpc_menu_output_modes[$cpc_previous_mode]

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1076,60) : WARNING: $cpc_menu_output_modes: possibly used before declaration.

GUICtrlSetState($cpc_menu_output_modes[$cpc_previous_mode],

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1082,43) : WARNING: $check_special_clip_copy: possibly used before declaration.

GUICtrlSetTip($check_special_clip_copy,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1084,34) : WARNING: $check_autocopy: possibly used before declaration.

GUICtrlSetTip($check_autocopy,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1103,31) : ERROR: cpc_ButtCopyColor() called by a previous line with 0 arg(s). Min = 1. First previous line calling this Func is 489.

func cpc_ButtCopyColor($color)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1143,37) : WARNING: $TrayItemDoneQuits: possibly used before declaration.

TrayItemSetState($TrayItemDoneQuits,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1149,45) : WARNING: $check_lumlive: possibly used before declaration.

ControlClick($gui_color, "", $check_lumlive)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1163,45) : WARNING: $check_maglive: possibly used before declaration.

ControlClick($gui_color, "", $check_maglive)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1208,45) : WARNING: $check_hexlive: possibly used before declaration.

ControlClick($gui_color, "", $check_hexlive)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1243,64) : WARNING: $TrayItemToggleOnTop: possibly used before declaration.

if $cpc_stand_alone then TrayItemSetState($TrayItemToggleOnTop,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1264,65) : WARNING: $TrayItemLiveTitleBar: possibly used before declaration.

if $cpc_stand_alone then TrayItemSetState($TrayItemLiveTitleBar,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1275,34) : WARNING: $menu_hex_prefix: possibly used before declaration.

GUICtrlSetState($menu_hex_prefix,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1291,53) : WARNING: $colors_ini_path: possibly used before declaration.

local $tmp_array = IniReadSection($colors_ini_path,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1301,25) : WARNING: $groups possibly not declared/created yet

$groups[$i] = $a_group

~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1329,52) : WARNING: $cpc_my_group: possibly used before declaration.

GUICtrlSetData($combo_custom_groups, $cpc_my_group)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1336,47) : WARNING: $previous_combo_groups: possibly used before declaration.

RememberComboSelection($previous_combo_groups,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1343,36) : WARNING: $groups: possibly used before declaration.

global $this_group = $groups[$i]

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1353,42) : WARNING: $custom_color_box: possibly used before declaration.

GUICtrlSetBkColor($custom_color_box[$i],

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1354,25) : WARNING: $this_group: possibly used before declaration.

if $this_group[$i][0] <>

~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1391,21) : WARNING: $current_box: possibly used before declaration.

if $current_box =

~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1535,18) : WARNING: $ini_process: possibly used before declaration.

if $ini_process then

~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1598,28) : WARNING: $dont_pop_up_comments: possibly used before declaration.

if $dont_pop_up_comments =

~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(1619,26) : WARNING: $group_process: possibly used before declaration.

if not $group_process then

~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(2097,21) : WARNING: $sort_flags: possibly used before declaration.

if $sort_flags[10] then

~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(2103,33) : WARNING: $sort_colors: possibly used before declaration.

cpc_ColorSortName($sort_colors)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(2320,37) : WARNING: $mag_save_blocks: possibly used before declaration.

$mag_save &= $mag_save_blocks[$i] &

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(2350,48) : WARNING: $cpc_data_parent: possibly used before declaration.

ShellExecute ("Explorer.exe", $cpc_data_parent)

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(2479,21) : WARNING: $cpc_killed: possibly used before declaration.

if not $cpc_killed then

~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3(2481,28) : WARNING: $dummy_container: possibly used before declaration.

GUIDelete($dummy_container)

~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\corz_essentials.au3(780,42) : ERROR: $ini_path: undeclared global variable.

if $ssp_x <> "-" then IniWrite($ini_path,

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

C:\Documents and Settings\Admin\Desktop\color thing\color pickin chooser.au3 - 2 error(s), 113 warning(s)

BrettF · October 4, 2007

Same errors...

therks · October 4, 2007

Well.. the screenshot looks nice.

corz · October 5, 2007

Thanks for the feedback, guys! I thought it was just going to slip off the page forever!

I was actually just coming to ask if someone could try the source in vista for me.

I didn't get any topic reply notifications, and didn't realize anyone had posted!

(I could have sworn I set that in my prefs!)

Any idea what could be causing this in Vista..

"Line -1:

Error: Subscript used with non-Array variable"

I've tried it on a couple of XP systems without trouble, but I don't have Vista.

If someone could compile it on Vista, I'd be most grateful.

Paulie, thanks for that. Most of that seems wrong somehow (looks like SciTe is being cautious, is all), but there were two real errors, which I've since fixed the "$ini_path", and the cpc_ButtCopyColor() function call. I've uploaded new versions of the code (color pickin chooser.au3, corz_essentials.au3) the pack, and the .exe.

It's not like coding php where you can throw it on a dozen different servers and give it a good field test, so I'm relying on you guys to keep me right!

All reports heartily welcomed!

;o)

(or

Edited October 5, 2007 by corz

mofle · October 5, 2007

Hi, i downloaded the latest source code and i still get the error message in Vista:

corz · October 6, 2007

AHA! Now THAT is the kinda help I was looking for! Thanks mofle!

I'm guessing Vista has some kind of security "feature" that is preventing the FileInstall commands from completing, or something along those lines. The images should be copied into the user's home folder, so I don't understand why it would fail. I don't really want to use #RequireAdmin for a color picker! That's crazy!

Well, at least I have a clue about the issue; thanks again mofle, much appreciated.

;o)

(or

ps. does anyone know the location of an image that can be relied upon to be there, in Vista? Like a windows logo or something.

corz · October 6, 2007

I've added another update. If you run Vista, please help!!!

I've added error correction for the image locations, and cpc will now pop up the dialog for the user to choose their own picker images folder. Hopefully that should get around any security issues. I've also bundled the picker images along with the .exe so that Vista users can install them manually, if they want to.

Anyone have a spare minute?

;o)

(or

mofle · October 6, 2007

Hi, i tried out the new version. It's starts and i choose a folder, but the colorpicker wont work.

corz · October 6, 2007

Well, it's a start! Hey! it looks pretty cool in Vista.

Okay, I dunno what's going on here. If that "#" icon wasn't showing, we could say, "Oh, well, obviously the icons aren't being loaded correctly", but that one is, which just fries my brain! Did you try the updated source? It would be good to know at what point it "won't work". Does it just stop dead, and need to be killed?

That's roughly the point it loads the tips system. I wonder if the tips file is suffering the same trouble the images were (I could use a temp folder for that, I guess).

What are the contents of you @appdata/corz/color pickin chooser/ folder ? does it even exist?

KNowing what's in there would be really useful.

If I could see, or someone else could see for me, what's happening, it would doubtless be simple enough to fix. In the meantime, try disabling the tips and run it again. In your ini file, set..

no_tips=1

;o)

(or

mofle · October 6, 2007

I did try the updated source.

I didn't stop working, because it never started working.

How can i pick a color from the screen outside the box?

I have to select a folder for the images every time the app starts, but it doesn't show any of them.

The sliding effect isn't working to good on Vista either. And who cares about being able to select a window animation in a colorpicker app, it's just bloating the app.

And yes, the @appdata/corz/color pickin chooser/ folder does exist and has the following files:

color pickin chooser.ini

tips.txt

picker images <---[empty folder]

Edited October 6, 2007 by mofle

corz · October 6, 2007

I like the slide, it helps me navigate when I'm picking colours quickly. You can disable it, if it bugs you.

For some reason, it's not installing the picker images, I wonder what your preference value for "samples_installed" is. This seems weird if it's installing the tips file okay. Does Vista have some extra security for image files?

What happens if you drag an image onto the picker (it *should* copy it to your current picker images folder and select it in the picker)

To pick outside the gui, shift-click the mag icon. But, I thought you said it wasn't working!

Wanna post the contents of your ini file?

;o)

(or

mofle · October 6, 2007

Hi, i dragged the image folder to the @appdata/corz/color pickin chooser/ folder:

You should use another code for your magnifying, since it's way to slow, use this code instead:

;========================================
; Author: Toady
;
; Mousehook DLL: Larry
; GDI Library: PaulIA
;
; Example desktop zoom using mouse scroll
; and GDI+
;========================================
#include <A3LScreenCap.au3>
#include <misc.au3>
#include <GuiConstants.au3>
#include <A3LGDIPlus.au3>

_Singleton("zoom")

Opt("RunErrorsFatal",0)

Global Const $DESTW = 400 ;width of zoom box
Global Const $DESTH = 400 ;height of zoom box
Global Const $BASE_BOX_SIZE = 20 ;max zoom box is 40x40 pixels
Global $title = "Mouse zoom"
Global $refresh = Floor(1000/@DesktopRefresh) ;no flicker
Global $zoom_level = 5 ;Initial zoom

$GUI = GUICreate($title,400,400,-1,-1)
$label_zoom = GUICtrlCreateLabel("Zoom: 1x",70,205,100)
GUICtrlSetFont (-1,12, 400, Default, "Comic Sans MS")
GUISetState(@SW_SHOW,$GUI)
WinSetOnTop ($title,"",1)
_HookMouse($GUI) ;hook mouse scroll for zooming

While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            _UnHookMouse()
            _GDIP_ShutDown()
            Exit
    EndSelect
WEnd

Func _GetIMG($hWndGUI, $MsgID, $WParam, $LParam)
    Local $x = BitAND($LParam,0x0000FFFF) ;Get mouses x coord
    Local $y = BitShift($LParam,16) ;Get mouses y coord
    Local $currentZoom = $BASE_BOX_SIZE*$zoom_level ;The "+-" for the screen capture
    _GDIP_StartUp() ;Start GDI
    $BITMAP_H = _ScreenCap_Capture("",$x-$currentZoom,$y-$currentZoom,$x+$currentZoom,$y+$currentZoom)
    $hImage  = _GDIP_BitmapCreateFromHBITMAP($BITMAP_H)
    $hGraphic = _GDIP_GraphicsCreateFromHWND($gui)
    _GDIP_GraphicsSetSmoothingMode($hGraphic, 0)
    $iWidth  = _GDIP_ImageGetWidth ($hImage)
    $iHeight = _GDIP_ImageGetHeight($hImage)
    _GDIP_GraphicsDrawImageRectRect($hGraphic, $hImage, 0, 0,$iWidth,$iHeight,0,0,$DESTW ,$DESTH)
    _GDIP_GraphicsDispose($hGraphic)
    _GDIP_ImageDispose($hImage)
    _API_DeleteObject($BITMAP_H)
    _UnHookMouse()
    Sleep($refresh)
    _HookMouse($hWndGUI)
EndFunc

Func _HookMouse($gui)
    Global $DLLinst = DLLCall("kernel32.dll","hwnd","LoadLibrary","str",".\hook.dll")
    Global $mouseHOOKproc = DLLCall("kernel32.dll","hwnd","GetProcAddress","hwnd",$DLLInst[0],"str","MouseProc")
    Global $hhMouse = DLLCall("user32.dll","hwnd","SetWindowsHookEx","int",7, _
                "hwnd",$mouseHOOKproc[0],"hwnd",$DLLinst[0],"int",0)
    DLLCall(".\hook.dll","int","SetValuesMouse","hwnd",$gui,"hwnd",$hhMouse[0])
    GUIRegisterMsg(0x1400 + 0x0D30, "_Zoom") ;mouse wheel up
    GUIRegisterMsg(0x1400 + 0x0D31, "_Zoom") ;mouse wheel down
    GUIRegisterMsg(0x1400 + 0x0F30,"_GetIMG") ;mouse move
EndFunc

Func _Zoom($hWndGUI, $MsgID, $WParam, $LParam)
        If $MsgID = 8496 And $zoom_level > 1 Then ;scroll up
            $zoom_level -= 1
        ElseIf $MsgID = 8497 And $zoom_level < 5 Then;scroll down
            $zoom_level += 1
        EndIf
        GUICtrlSetData($label_zoom,"Zoom: " & 6-$zoom_level & "x")
        _GetIMG($hWndGUI, $MsgID, $WParam, $LParam) ;zoom while mouse being still
EndFunc

Func _UnHookMouse()
    DLLCall("user32.dll","int","UnhookWindowsHookEx","hwnd",$hhMouse[0])    
    DLLCall("kernel32.dll","int","FreeLibrary","hwnd",$DLLinst[0])
EndFunc

You would also need this .dll file: DivShare File - hook.dll

And heres my .ini file:

[color pickin chooser]
gui_fx=Fade
my_group=empty
picker_images_folder=C:\Users\mofle\AppData\Roaming\corz\color pickin chooser\picker images
no_tips=1
tips_count=15
live_hex=0
live_mag=0
live_luminance=0
auto_copy=0
x=1197
y=619
my_color=F0F0F0
mag_save=15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|1

5790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15

790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|157

90320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|1579

0320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790

320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|157903

20|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|1579032

0|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320

|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|15790320|

15790320
last_mag=804|566
seen_tips_warning=1
colors_in_titlebar=1
picker_image=C:\Users\mofle\AppData\Roaming\corz\color pickin chooser\picker images\Spectrums\Spectrum.jpg

big_daddy · October 6, 2007

If you find and replace all..

I:\work\dev\autoit\color pickin chooser

with...

and change the includes from this...

#include <corz_essentials.au3>
#include <corz_gui_fx.au3>
#include <corz_colors.au3>
#include <corz_tips.au3>oÝ÷ ÚÚ-+ºÚ"µÍÚ[ÛYH    ËÌLÒ[ÛYIÌLØÛÜÙÜÙ[X[Ë]LÉÝÂÚ[ÛYH ËÌLÒ[ÛYIÌLØÛÜÙÝZWÙ]LÉÝÂÚ[ÛYH    ËÌLÒ[ÛYIÌLØÛÜØÛÛÜË]LÉÝÂÚ[ÛYH  ËÌLÒ[ÛYIÌLØÛÜÝË]LÉÝ

everything will work better.

This is a really nice app, I can tell you put a lot of time into it. However your script organization skills need some improvement.

Just a few pointers

Includes always go at the top of the script
Always declare your globals and constants at the top of your script. Not within functions.
Try to use relative paths when possible as most directory structures are not the same.

corz · October 6, 2007

Looks better, but there's still icons not showing. I don't understand that. Why is the '#' icon showing? And why won't it do the FileInStall for the images. It seems incredible that no one's come across this before!

About the magnifier, I've seen the dll code (read my notes) and prefer this. If I remember correctly, mouse-clicks won't register correctly on it (and you need to pick colors from the mag, right?), anyways, using others dll's just isn't my scene.

Anyways, now that you have images, does it work? can you do the other stuff, make groups, add colors, import/export palettes, drag&drop and such?

Did you try to compile it on Vista? Did you get icons?

Thanks for the ini. Good info. I was thinking about inserting a wee routine that sends an http request so that I can log what corner of the desktop folk keep it on, and what slide fx they are using!

jk

;o)

(or

corz · October 6, 2007

Thanks big_daddy, I appreciate your feedback. And you're right, I did put a lot of work into it, which makes this debugging all the more frustrating; it works just fine on MY system!

About your feedback..

1. Aren't they?

2. They need to be within a function, mainly as the app itself also works as an include. It would be wasteful, and downright tricky to declare them anywhere else. I thought long and hard about this.

3. You're the second person to say this, yet no one will tell me how else to do a FileInstall. The AutoIt manual states that it MUST be a real local path ("The source file must be a string and not a variable so that the compiler can extract the filename to include."), and once the app is compiled, the resources exist within the app, and the local path is gone. Am I missing something?

In the notes at the top of the color pickin chooser source, it says, "note: if you want to play with/compile this, run a search for "I:\work\dev\autoit\color pickin chooser", and insert your own dev paths, instead." That's the best I can do! Please, if someone knows a way to do FileInstall with relative paths or variable, tell me! I want to make this better, for YOU. And ignorance is just annoying, especially when it's my own.

;o)

(or

ResNullius · October 7, 2007

3. You're the second person to say this, yet no one will tell me how else to do a FileInstall. The AutoIt manual states that it MUST be a real local path ("The source file must be a string and not a variable so that the compiler can extract the filename to include."), and once the app is compiled, the resources exist within the app, and the local path is gone. Am I missing something?

In the notes at the top of the color pickin chooser source, it says, "note: if you want to play with/compile this, run a search for "I:\work\dev\autoit\color pickin chooser", and insert your own dev paths, instead." That's the best I can do! Please, if someone knows a way to do FileInstall with relative paths or variable, tell me! I want to make this better, for YOU. And ignorance is just annoying, especially when it's my own.

Like big_daddy said, use something like

FileInstall(".\img\picker images\Homer X-Ray.jpg", $picker_img_dir & "\Homer X-Ray.jpg")

This will make the path relative to your current directory structure, the "." representing the directory that script is currently in.

For instance, I downloaded and unzipped your project to "D:\Programming\@AutoIt\Misc\color pickin chooser" and the first thing I did was go through and change every ""I:\work\dev\autoit\color pickin chooser" to "."

I could then move the whole color pickin folder to any other drive/folder and it would still run/compile without any problems.

By the way, I downloaded this the day you posted and I must say I am super impressed by the care and obvious thought that went into its design and execution.

The GUI is one of the best I've seen on an AutoIt app.

corz · October 7, 2007

I see! If I hadn't been drinking last night, I might have spotted that! Cheers.

(I was drowning my sorrows - the failure of a non-working app was just too much to bear!)

I recommend this relative dot business is added to the manual immediately! Anyway..

When you say "it would still run/compile without any problems", does that mean that it did actually run without problems? No one has gotten back to say, "yes it works for me, 100%", which as you might imagine, is extremely frustrating. There's nothing out there that can do some of the things it can do, so obviously, I'd like it to be as close to perfect as possible, on Vista too, so that others can enjoy it as I do.

Och well, we'll get there. Thanks again for the feedback, I'm about to go swooping through my AutoIt dev folder adding dots everywhere! If you like the gui, check out my clock, its preference pane has oodles of funky stuff going on, mouse-over help, you name it!

;o)

(or

Sign In

color pickin chooser

Recommended Posts

corz

mofle

therks

Paulie

BrettF

therks

corz

mofle

corz

corz

mofle

corz

mofle

corz

mofle

big_daddy

corz

corz

ResNullius

corz

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members

Browse

AutoIt Resources

Release

Beta