Jump to content

GUI component interaction: Difference between revisions

m
(Mathematica)
Line 981:
 
=={{header|Mathematica}}==
<lang>Manipulate[Null, {{value, 0}, InputField[Dynamic[value], Number] &},
<lang>DynamicModule[{n = 0},
ColumnRow@{InputFieldButton[Dynamic[n]"increment", Numbervalue++],
Row@{Button["incrementrandom", n++],
If[DialogInput[
Button["random",
Column@{"Are you sure?",
If[DialogInput[
ColumnRow@{Button["AreYes", you sure?"DialogReturn[True]],
Row@{Button["YesNo", DialogReturn[TrueFalse]]}}],
nvalue = RandomInteger@10000], Method -> "Queued"]}}]</lang>
Button["No", DialogReturn[False]]}}],
n = RandomInteger@10000], Method -> "Queued"]}}]</lang>
 
=={{header|Oz}}==
Cookies help us deliver our services. By using our services, you agree to our use of cookies.