Re: Add new option to Notebook[]
- To: mathgroup at smc.vnet.net
- Subject: [mg55281] Re: [mg55240] Add new option to Notebook[]
- From: "Christoph Lhotka" <lhotka at astro.univie.ac.at>
- Date: Fri, 18 Mar 2005 05:33:59 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
Hi !
Don't know if it works on all Mathematica version, but you can add a new
option just by SetOptions
In[..]:= nb=Notebooks[][[1]]
Out[..]:=NotebookObject[Untitled-1]
In[..]:= SetOptions[nb,NewOption->"newvalue"]
In[..]:= Options[nb]
Out[..]:={FrontEndVersion -> 5.1 for X, ScreenRectangle -> {{0., 1024.}, {0.,
768.}}, WindowSize -> {520., 600.},
WindowMargins -> {{150., Automatic}, {Automatic, 52.}}, NewOption -> value,
StyleDefinitions -> Default.nb}
with kind regards...
On Thu, 17 Mar 2005 03:29:52 -0500 (EST)
"rod at flyingspinach.com" <rodney.delmar.price at gmail.com> wrote:
> Hi,
>
> I'd like to add a new option to Notebook[], so that I could write
> Notebook[{...}, NewOption->"new_option_string"]. Then I would be able
> to say Options[Notebook, NewOption] and get back the string
> "new_option_string". Can this be done?
>
> I've tried Options[Notebook] = Append[NewOption, Options[Notebook]]
> with no success.
>
> Thanks,
>
> -Rod
>
-- Christoph Lhotka --
University of Vienna
Institute for Astronomy
Tuerkenschanzstr. 17
1180 Vienna, Austria
fon. +43.1.4277.518.41
mail. lhotka at astro.univie.ac.at