Re: palettes: Mathematica input
- To: mathgroup at smc.vnet.net
- Subject: [mg101308] Re: palettes: Mathematica input
- From: Pillsy <pillsbury at gmail.com>
- Date: Wed, 1 Jul 2009 06:32:14 -0400 (EDT)
- References: <h2cpua$ahn$1@smc.vnet.net>
On Jun 30, 6:38 am, "alexxx.ma... at gmail.com" <alexxx.ma... at gmail.com>
wrote:
[...]
> E.g. I have all the letters ready in the palette "Basic Typesetting",
> and I thought that right-click -> "Generate Notebook" was what I
> wanted, but it simply copies the palette in a notebook, while I need
> all the lines "ButtonBox["..."] // DisplayForm;" ....
NotebookGet[] will get you what you're asking for, but this is so easy
to do with a Mathematica command I'm not sure I'd recommend that. For
instance, a palette for pasting in lowercase Greek letters:
CreatePalette[Grid[Partition[
(PasteButton[ToExpression[#1, StandardForm, Defer]] & ) /@
CharacterRange["\[Alpha]", "\[Omega]"], 4]]]
Cheers,
Pillsy