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/