Services & ResourcesWolfram ForumsMathGroup Archive

[Date Index] [Thread Index] [Author Index]

Help with dynamic functionality

• To: mathgroup at smc.vnet.net
• Subject: [mg128818] Help with dynamic functionality
• From: samid.hoda at gmail.com
• Date: Wed, 28 Nov 2012 03:17:34 -0500 (EST)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• Delivered-to: l-mathgroup@wolfram.com
• Delivered-to: mathgroup-newout@smc.vnet.net
• Delivered-to: mathgroup-newsend@smc.vnet.net

My actual problem is quite involved but I am including a simple example for
 illustrative purposes. I am trying to reproduce "Enabled"-like functionality as follows:

Clear[y, SliderModule];
SetAttributes[SliderModule, HoldAll];
SliderModule[enabled_] :=
 DynamicModule[{x = 0}, {Slider[
    Dynamic[x, (x = If[enabled, #, 0]) &]], Dynamic[x]}]
{Checkbox[Dynamic[y]], Dynamic[y], SliderModule[y]}

Ideally when the checkbox is checked then the user is able to move the slider; but when it is unchecked the slider resets to zero. The problem is when I uncheck the checkbox the slider doesn't reset to zero until I click on the slider itself. Is there a way to get the slider to immediately reset when I uncheck the checkbox? Please remember that this is a simplification of my actual problem so try to keep the SliderModule structure the same.

Cheers,
Sam

• Follow-Ups:
  • Re: Help with dynamic functionality
    • From: John Fultz <jfultz@wolfram.com>
  • Re: Help with dynamic functionality
    • From: Fred Simons <f.h.simons@tue.nl>