GUI component interaction: Difference between revisions

Content added Content deleted
Line 669:
#field txtNumber.
// Contains the number as showed in TextBox
#field number.
Line 712 ⟶ 711:
[
number := number + 1.
$self $changeTextBoxValue.
]
Line 720 ⟶ 719:
[
number := randomGenerator eval:99999999.
$self $changeTextBoxValue.
].
]
#method $changeTextBoxValue
[
txtNumber set &caption:(number literal).