Re: change slider to pointed rectangle or arrow
- To: mathgroup at smc.vnet.net
- Subject: [mg79024] Re: change slider to pointed rectangle or arrow
- From: "Jean-Marc Gulliet" <jeanmarc.gulliet at gmail.com>
- Date: Mon, 16 Jul 2007 02:14:06 -0400 (EDT)
- References: <f7ca6h$8er$1@smc.vnet.net> <4699DE36.90701@gmail.com>
On 7/15/07, Murray Eisenberg <murray at math.umass.edu> wrote:
> I tried your example, and I'm getting an error appearing in the Messages
> window:
>
> The specified setting for the option SliderBoxOptions, Appearance
> cannot be used.
>
> This refers, I believe, just to the value "" of a.
Yes, sorry about that: I copied the wrong line to the email! (Note
that I am not sure about the settings "Automatic", but it seems that
it does not generate any error message.)
In[1]:= $Version
Out[1]= "6.0 for Microsoft Windows (32-bit) (April 20, 2007)"
In[2]:= ColumnForm[
Table[Slider[0.5,
Appearance -> a], {a, {"Automatic", "UpArrow", "DownArrow"}}]]
> More importantly, I'm just seeing three ordinary, rectangular sliders.
>
> Yet I do see the anticipated effect in the screen shot you linked in
> your reply.
>
> Something very peculiar is going on!
>
> My version is
>
> $Version
> 6.0 for Microsoft Windows (32-bit) (June 19, 2007)
>
> which is what is otherwise known as 6.0.1.
Hum, the behavior seems to be platform and/or version dependent.
Regards,
Jean-Marc
> Jean-Marc Gulliet wrote:
> > Murray Eisenberg wrote:
> >> Is there any way within Manipulate to make a slider appear as either a
> >> filled rectangle topped by a triangle -- a shape very roughly like this
> >>
> >> ^
> >> | |
> >> _
> >>
> >> -- or as just a filled triangle or vertical arrow?
> >>
> >> What about in a more general expression using an explicit Slider?
> >>
> >> I ask this because the help gives the following example --
> >>
> >> Table[Slider[0.5, Appearance -> a], {a, {"UpArrow", "DownArrow"}}]
> >>
> >> -- but I see absolutely no differences in the results as from not
> >> using the Appearance option at all.
> >
> > Weird. On my Wintel machine, I clearly see a difference.
> >
> > ColumnForm[
> > Table[Slider[0.5,
> > Appearance -> a], {a, {"", "UpArrow", "DownArrow"}}]]
> >
> > See http://homepages.nyu.edu/~jmg336/mathematica/SliderUpDownArrows.png
> >
> > Regards,
> > Jean-Marc
> >
>
> --
> Murray Eisenberg murray at math.umass.edu
> Mathematics & Statistics Dept.
> Lederle Graduate Research Tower phone 413 549-1020 (H)
> University of Massachusetts 413 545-2859 (W)
> 710 North Pleasant Street fax 413 545-1801
> Amherst, MA 01003-9305
>
