Case ignoring my terms ?

[ForsakenGod]

Hello ,

I ve created a script that previews a color into an text label thrught Guictrlsetbkcolor but i have a problem this is in the 1st while 1 loop

While 1

Case $OldSelect <> GUICtrlRead($colorinp) 
                Farba()
Wend

Function Farba is following

Func Farba()
    Global $color = GuiCtrlRead($colorinp)
    GUICtrlSetBkColor($preview, $color)
    Global $color2 = GuiCtrlRead($colorinp2)
    GUICtrlSetBkColor($preview2, $color2)
    Global $OldSelect = GUICtrlRead($colorinp)
EndFunc

The problem is that the color is still refreshing which makes it a bit ugly Actually it looks like it ignores my $OldSelect <> GUICtrlRead($colorinp) And i dont know why

Does any one have idea why the color in my text labels is still looping even when my Case is does not occour ? (changinf the value of inputbox)

Thanks in advance

Unreal

[Melba23]

ForsakenGod,

You do not show how you trigger the Case, so it might be that you just never test it. Try using an If statement rather than a Case:

#include <GUIConstantsEx.au3>

Global $OldSelect = "", $color

$hGUI = GUICreate("Test", 500, 500)

$colorinp = GUICtrlCreateInput("", 10, 10, 200, 20)

$preview = GUICtrlCreateLabel("", 0, 100, 500, 200)

GUISetState()

While 1

    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch

    If $OldSelect <> GUICtrlRead($colorinp) Then
        $OldSelect = GUICtrlRead($colorinp)
        Farba()
    EndIf

WEnd

Func Farba()
    $color = GuiCtrlRead($colorinp)
    GUICtrlSetBkColor($preview, $color)
EndFunc

Does that help?

M23

[ForsakenGod]

ForsakenGod,

You do not show how you trigger the Case, so it might be that you just never test it. Try using an If statement rather than a Case:

#include <GUIConstantsEx.au3>

Global $OldSelect = "", $color

$hGUI = GUICreate("Test", 500, 500)

$colorinp = GUICtrlCreateInput("", 10, 10, 200, 20)

$preview = GUICtrlCreateLabel("", 0, 100, 500, 200)

GUISetState()

While 1

    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch

    If $OldSelect <> GUICtrlRead($colorinp) Then
        $OldSelect = GUICtrlRead($colorinp)
        Farba()
    EndIf

WEnd

Func Farba()
    $color = GuiCtrlRead($colorinp)
    GUICtrlSetBkColor($preview, $color)
EndFunc

Does that help?

M23

Ohh thanks It definelly showed me back my way thanks