Anonymous user
GUI enabling/disabling of controls: Difference between revisions
GUI enabling/disabling of controls (view source)
Revision as of 18:23, 20 October 2017
, 6 years agono edit summary
No edit summary |
|||
Line 1,420:
n.b. Open stack handlers would be prudent to initialise the default value and button states if this were to be saved for standalone execution.
=={{header|Maple}}==
For this problem, you will need to open up Maple, go to the Components tab on the left, and insert a Text Area, and 2 Buttons. By right clicking each button, and clicking Component Properties, change one to Increase, and the other to Decrease. Then, click on 'Edit Content Changed Action". In the one labeled increase, type:
<lang Maple>
Increase();
</lang>
In the one labeled Decrease, type:
<lang Maple>
Decrease();
</lang>
Then, by clicking the 2 gears and opening up the start-up commands, enter this:
<lang Maple>
macro(SP=DocumentTools:-SetProperty, GP=DocumentTools:-GetProperty);
with(Maplets[Elements]):
SP("Text",value,0);
Increase:=proc()
SP("Text",value,parse(GP("Text",value))+1);
if parse(GP("Text",value))>=10 then
SP("Button0", enabled, false);
else
SP("Button0", enabled, true);
end if;
if parse(GP("Text",value))<=0 then
SP("Button1", enabled, false);
else
SP("Button1", enabled, true);
end if;
end proc;
Decrease:=proc()
SP("Text",value,parse(GP("Text",value))-1);
if parse(GP("Text",value))<=0 then
SP("Button1", enabled, false);
else
SP("Button1", enabled, true);
end if;
if parse(GP("Text",value))>=10 then
SP("Button0", enabled, false);
else
SP("Button0", enabled, true);
end if;
end proc;
</lang>
=={{header|Mathematica}}==
| |||