Re: are there any methods of figuring out how "large" a piece of typeset textual data will be?
- To: mathgroup at smc.vnet.net
- Subject: [mg71269] Re: [mg70660] are there any methods of figuring out how "large" a piece of typeset textual data will be?
- From: "Chris Chiasson" <chris at chiasson.name>
- Date: Sun, 12 Nov 2006 06:48:21 -0500 (EST)
- References: <200610220520.BAA04787@smc.vnet.net> <453C2C63.70702@wolfram.com> <acbec1a40611112113w2f4555eid52a2ff8cdfc9087@mail.gmail.com>
I forgot to mention why this addendum is useful. Export and
ExportString can't export typeset expressions as "PDF". However, they
can export Graphics. The addendum provides a way to go from a typeset
expression to a graphics object. Of course, that still does not
provide a way around the fact that Mathematica doesn't embed its own
fonts into exported PDFs.
On 11/11/06, Chris Chiasson <chris at chiasson.name> wrote:
> A short addendum for those who may search for this in the future:
>
> A Graphics object that just barely contains the box (or Cell) "form"
> of an expression may be created. Creating a Cell without a border is
> outside the scope of this post, but involves the options
> CellFrameMargins & CellMargins.
>
> anyway, assuming boxes is defined appropriately:
>
> {{width,yup,ydown}}=FrontEndExecute[GetBoundingBoxSizePacket[boxes]];
>
> Graphics[Text[DisplayForm@boxes,{0,0}],ImageSize->({width,yup+ydown}/Magnification^2/.AbsoluteOptions[$FrontEnd,Magnification])]//Show
>
> On 10/22/06, Carl Woll <carlw at wolfram.com> wrote:
> > Chris Chiasson wrote:
> >
> > >... after the front end gets done formatting it?
> > >
> > >I was thinking about getting the front end to spit out an equivalent
> > >EPS for the text and extracting the size from that, but I don't know
> > >if I can do it properly. Is there an easy method? Perhaps via some
> > >kind of API?
> > >
> > >The context for this question is that I am trying to generate "labels"
> > >(expressions) for nodes in a graph. I am trying to diagram functions.
> > >
> > >
> > There is an undocumented function that you may use to obtain this
> > information, with the usual caveat that this functionality is subject to
> > change. Here is an example of finding the size of the expression
> > Expand[(1+x)^11]:
> >
> > In[6]:=
> > FrontEndExecute[GetBoundingBoxSizePacket[BoxData[ToBoxes[Expand[(1 +
> > x)^11]]]]]
> > Out[6]=
> > {{504., 13., 4.}}
> >
> > I believe the returned values are {{width, toptobaseline,
> > baselinetobottom}} in points.
> >
> > Carl Woll
> > Wolfram Research
> >
>
>
> --
> http://chris.chiasson.name/
>
--
http://chris.chiasson.name/