Sign in to follow this  
Followers 0
elZip

problem whit "edit"

3 posts in this topic

hello to all an aid for this small program serves me, my problem is that when I press a push-button it cancels all which was previously in "edit" I would have to only add, :whistle:

#include <GUIConstants.au3>
#NoTrayIcon
$Gunz_color_utility = GUICreate("Gunz_color_utility v 0.2", 364, 241, 383, 177)
GUISetBkColor(0xA6CAF0)
$colori = GUICtrlCreateGroup("Colori", 24, 32, 137, 73)
GUICtrlSetBkColor(-1, 0xA6CAF0)
$a1 = GUICtrlCreateButton("1", 40, 56, 17, 17, 0)
$a7 = GUICtrlCreateButton("7", 64, 77, 17, 17, 0)
$a6 = GUICtrlCreateButton("6", 40, 77, 17, 17, 0)
$a5 = GUICtrlCreateButton("5", 134, 55, 17, 17, 0)
$a2 = GUICtrlCreateButton("2", 63, 56, 17, 17, 0)
$a8 = GUICtrlCreateButton("8", 87, 77, 17, 17, 0)
$a3 = GUICtrlCreateButton("3", 87, 56, 17, 17, 0)
$a4 = GUICtrlCreateButton("4", 111, 55, 17, 17, 0)
$a9 = GUICtrlCreateButton("9", 111, 77, 17, 17, 0)
$a0 = GUICtrlCreateButton("0", 134, 77, 17, 17, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$rosso = GUICtrlCreateLabel("1=Rosso", 176, 40, 46, 17)
GUICtrlSetBkColor(-1, 0xA6CAF0)
$verde = GUICtrlCreateLabel("2=Verde", 176, 56, 44, 17)
GUICtrlSetBkColor(-1, 0xA6CAF0)
$blu = GUICtrlCreateLabel("3=Blu", 176, 72, 31, 17)
GUICtrlSetBkColor(-1, 0xA6CAF0)
$giallo = GUICtrlCreateLabel("4=Giallo", 176, 88, 42, 17)
GUICtrlSetBkColor(-1, 0xA6CAF0)
$rossos = GUICtrlCreateLabel("5=Rosso scuro", 176, 104, 75, 17)
GUICtrlSetBkColor(-1, 0xA6CAF0)
$verdes = GUICtrlCreateLabel("6=Verde scuro", 264, 40, 73, 17)
GUICtrlSetBkColor(-1, 0xA6CAF0)
$blus = GUICtrlCreateLabel("7=Blu scuro", 264, 56, 60, 17)
GUICtrlSetBkColor(-1, 0xA6CAF0)
$giallos = GUICtrlCreateLabel("8=Giallo scuro", 264, 72, 71, 17)
GUICtrlSetBkColor(-1, 0xA6CAF0)
$bianco = GUICtrlCreateLabel("9=bianco", 264, 88, 48, 17)
GUICtrlSetBkColor(-1, 0xA6CAF0)
$grigio = GUICtrlCreateLabel("0=Grigio", 264, 104, 43, 17)
GUICtrlSetBkColor(-1, 0xA6CAF0)
$list = GUICtrlCreateEdit("", 24, 136, 313, 73)
GUICtrlSetData(-1, "")
GUISetState(@SW_SHOW)

While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            Exit
    Case $msg = $a1
    GUICtrlSetData($list,"^1")
    Case $msg = $a2
    GUICtrlSetData($list,"^2")
    Case $msg = $a3
    GUICtrlSetData($list,"^3")
    Case $msg = $a4
    GUICtrlSetData($list,"^4")
    Case $msg = $a5
    GUICtrlSetData($list,"^5")
    Case $msg = $a6
    GUICtrlSetData($list,"^6")
    Case $msg = $a7
    GUICtrlSetData($list,"^7")
    Case $msg = $a8
    GUICtrlSetData($list,"^8")
    Case $msg = $a9
    GUICtrlSetData($list,"^9")
    Case $msg = $a0
    GUICtrlSetData($list,"^0")
    EndSelect
WEnd

Share this post


Link to post
Share on other sites



you mean you want to add it to the $list control ?

Something like this ?

GUICtrlSetData($list, GUICtrlRead($list) & "^1")


Visit the SciTE4AutoIt3 Download page for the latest versions        Beta files                                                          Forum Rules
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Share this post


Link to post
Share on other sites

you mean you want to add it to the $list control ?

Something like this ?

GUICtrlSetData($list, GUICtrlRead($list) & "^1")

thanks 1k :whistle:

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