I am a beginner, like you, and I learnt how to bind buttons to
actions from the Workspace a few days ago :)
So, here is a minimal working snippet. Run one line at a time for
best fun. First line is only to clean already existing widgets. I
did not put the Layout stuff to keep things as easy/nice as
possible.
--------------------
"Run this line to clean up and restart testing. Not useful on first
run "
s delete. bp delete. bm delete.
s := StringMorph new.
s openInWorld .
s contents: '0'.
s position: 100@100.
bp := SimpleButtonMorph new.
bp openInWorld .
bp label: 'Plus-1'.
bp position: 150@100.
bm := SimpleButtonMorph new.
bm openInWorld .
bm label: 'Minus-1'.
bm position: 250@100.
"------ Add actions to buttons ------------ "
bp target: [ s contents: (s contents asInteger + 1) asString ].
bp actionSelector: #value.
bm target: [ s contents: (s contents asInteger - 1) asString ].
bm actionSelector: #value.
--------------------
bye
Nicola
On 8/13/19 12:40 PM, Michael Rice
wrote:
A TextMorph (string '15') and two SimpleButtons,
one with a '+' and the other with a '-'.
Target for both buttons is the TextMorph. The following,
executed (with DoIt) in the bottom subwindow of the '+' button
inspector increments the TextMorph by 1.
(self target) contents: ((((self target) getNumericValue) + 1)
printStringBase: 10).
However, a Viewer for the '+' button seems to have no target
variable. And a script for the button rejects "button up?" and
"button down?" tests with error messages.
Seems I'm trying to hook up some incompatible things. How would
one hook up these three morphs, simply?
_______________________________________________
Beginners mailing list
[hidden email]
http://lists.squeakfoundation.org/mailman/listinfo/beginners
_______________________________________________
Beginners mailing list
[hidden email]
http://lists.squeakfoundation.org/mailman/listinfo/beginners
Locked
