Services & ResourcesWolfram ForumsMathGroup Archive

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

Re: How Can I Change the Appearance of a Locator in Manipulate

• To: mathgroup at smc.vnet.net
• Subject: [mg132277] Re: How Can I Change the Appearance of a Locator in Manipulate
• From: "E. Martin-Serrano" <eMartinSerrano at telefonica.net>
• Date: Tue, 28 Jan 2014 06:17:23 -0500 (EST)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• Delivered-to: l-mathgroup@wolfram.com
• Delivered-to: mathgroup-outx@smc.vnet.net
• Delivered-to: mathgroup-newsendx@smc.vnet.net
• References: <20140126081501.97E6569E6@smc.vnet.net>

Try

flocator[r_, color_: Red] := 
 Graphics[{Circle[{0, 0}, Offset[r]], color, Disk[{0, 0}, Offset[3]]},
   ImageSize -> 20 ]

Try differents colors and radious as in

locator = flocator[3, LightBlue]

And then in 'LocatorPane'

Appearance -> {locator,None}

or

Appearance -> {locator,""}

If you want to hide the locators you can use a flag

flag = {True | False}

and then

Appearance -> {Dynamic@If[flag[locator,""]}

Using a similar construct you might get different colours for different
locators

locator1 = flocator[3, LightBlue]
locator2 = flocator[3, LightRed]
locator3 = flocator[3, LightGreen]

Appearance ->  {Dynamic@If[flag, locator1, ""],  Dynamic@If[flag, locator2,
""],   Dynamic@If[flag, locator3, ""]}

E. Martin-Serrano

-----Mensaje original-----
De: Gregory Lypny [mailto:gregory.lypny at videotron.ca] 
Enviado el: domingo, 26 de enero de 2014 9:15
Para: mathgroup at smc.vnet.net
Asunto: How Can I Change the Appearance of a Locator in
Manipulate

Hello everyone,

Is it possible to change the appearance of a locator in a Manipulate? The
only change I've been able to make is to make it invisible using Appearance
-> None, as in

{{pt2, {80, 80}}, Locator, Appearance -> None}

but other appearance options, such as Small or Large, do not work.

Gregory

• References:
  • How Can I Change the Appearance of a Locator in Manipulate
    • From: Gregory Lypny <gregory.lypny@videotron.ca>