Jump to content

Editing a label with a button.


Recommended Posts

I'm working on a script at the moment and I'm trying to setup a system where if you press a button it will take away a certain amount from a label.

Such as.

$label = guictrlcreatelabel("100"..........)

is there a way to make it so...

$remove = guictrlcreatebutton("Takeaway"...........)

will remove lets say 50 from the 100 or any amount.

I looked for it but I wasn't able to find anything, thanks in advance :)

Edit:

So I just wrote this up and it works but it won't keep removing the amount from the label.

GUICreate("",200,100)
$bal = ("100")
$lb1 = GUICtrlCreateLabel($bal,0,0)
$button1 = GUICtrlCreateButton("Remove",0,30,100,30)

GUISetState()

while 1
   $msg = GUIGetMsg()
   Select
   Case $msg = $button1
      GUICtrlSetData($lb1,$bal - "5")
   Case $msg = -3
      Exit
      EndSelect
      WEnd

If I press "Remove" it takes away 5 but it only does it once, any ideas on how to fix that?

Edited by gottygolly
Link to comment
Share on other sites

GUICreate("",200,100)
$bal = 100
$lb1 = GUICtrlCreateLabel($bal,0,0)
$button1 = GUICtrlCreateButton("Remove",0,30,100,30)

GUISetState()

while 1
   $msg = GUIGetMsg()
   Select
    Case $msg = $button1
         $bal = $bal -  5
      GUICtrlSetData($lb1,$bal)
   Case $msg = -3
      Exit
      EndSelect
      WEnd

This works

REB

MEASURE TWICE - CUT ONCE

Link to comment
Share on other sites

  • Moderators

gottygolly,

Or just read the label itself to get the current value: :)

#include <GUIConstantsEx.au3>

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

$cLabel = GUICtrlCreateLabel("100", 10, 10, 400, 40)
GUICtrlSetFont($cLabel, 24)

$cButton_Add5 = GUICtrlCreateButton("Add 5", 10, 100, 80, 30)
$cButton_Min10 = GUICtrlCreateButton("Minus 10", 110, 100, 80, 30)

GUISetState()

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
        Case $cButton_Add5
            GUICtrlSetData($cLabel, Number(GUICtrlRead($cLabel)) + 5)
        Case $cButton_Min10
            GUICtrlSetData($cLabel, Number(GUICtrlRead($cLabel)) - 10)
    EndSwitch
WEnd
M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to comment
Share on other sites

  • Moderators

gottygolly,

Entirely my own work, I assure you. :)

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

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...