RosettaCodeData/Task/GUI-enabling-disabling-of-controls/Mathematica/gui-enabling-disabling-of-controls.math
2023-07-01 13:44:08 -04:00

5 lines
240 B
Text

Manipulate[Null, {{value, 0},
InputField[Dynamic[value], Number,
Enabled -> Dynamic[value == 0]] &},
Row@{Button["increment", value++, Enabled -> Dynamic[value < 10]],
Button["decrement", value--, Enabled -> Dynamic[value > 0]]}]