Services & ResourcesWolfram ForumsMathGroup Archive

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

Re: Example of Dynamic Appearance of Locator in LocatorPane?

• To: mathgroup at smc.vnet.net
• Subject: [mg82466] Re: [mg82443] Example of Dynamic Appearance of Locator in LocatorPane?
• From: "Ricardo Samad" <resamad at gmail.com>
• Date: Sat, 20 Oct 2007 22:17:02 -0400 (EDT)
• References: <200710200955.FAA28894@smc.vnet.net>

Hi Craig,

You have to tweak the example below, but it works. There's a small lag
between the mouse cursor and the circle, but i think yu can live with it.

Manipulate[
 Plot[Cos[x], {x, 0, 2 \[Pi]}, Epilog -> Circle[pos, r],
  AspectRatio -> Automatic],
 {{r, 0.2, "radius"}, 0, 1}, {{pos, {3, 1/2}}, Locator,
  Appearance -> None}]

Ricardo

On 10/20/07, W. Craig Carter <ccarter at mit.edu> wrote:
>
>
> Does anyone have a short example of using Dynamic with
> LocatorPane Option for Appearance?
>
> For example, I am trying to get this:
>
> Manipulate[
>   DynamicModule[{pos = {1, 1/2}},
>    LocatorPane[Plot[Sin[x], {x, 0, 2 Pi}],
>     Appearance -> (*immediate*)
>      Dynamic[Graphics[Circle[pos, radius]]]]], {{radius, .2}, 0, 1}]
>
> or this:
>
> Manipulate[
>   DynamicModule[{pos = {1, 1/2}},
>    LocatorPane[Plot[Sin[x], {x, 0, 2 Pi}],
>     Appearance :> (*delayed*)
>      Dynamic[Graphics[Circle[pos, radius]]]]], {{radius, .2}, 0, 1}]
>
> to work. I can get the locator to move, but I'd like to get
> it to shrink and use its radius to calcuate other things.
>
>
> Thanks.
>
> W. Craig Carter
>
>
>


--
____________________________________
Ricardo Elgul Samad

tel: (+55 11) 3133-9372
fax: (+55 11) 3133-9374

Centro de Lasers e Aplica=E7=F5es
IPEN/CNEN-SP
AV. Prof. Lineu Prestes 2242
Cidade Universit=E1ria
05508-000
S=E3o Paulo - SP
Brazil
____________________________________

• References:
  • Example of Dynamic Appearance of Locator in LocatorPane?
    • From: "W. Craig Carter" <ccarter@mit.edu>