Jump to content

problem whit "edit"


elZip
 Share

Recommended Posts

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
Link to comment
Share on other sites

  • Developers

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

Something like this ?

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

SciTE4AutoIt3 Full installer Download page   - Beta files       Read before posting     How to post scriptsource   Forum etiquette  Forum Rules 
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Link to comment
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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...