Re: Justification of graphics in cells
- To: mathgroup at smc.vnet.net
- Subject: [mg43172] Re: Justification of graphics in cells
- From: "Steve Luttrell" <luttrell at _removemefirst_westmal.demon.co.uk>
- Date: Sat, 16 Aug 2003 02:53:54 -0400 (EDT)
- References: <bhaab5$klk$1@smc.vnet.net> <bhi5f7$hlg$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
I can confirm the same effect with Version 4.2.1 on Windows 98. I have also seen this type of behaviour many times before, usually when I build up a graphics cell "manually" by editing the underlying Cell expression. I would love to see the rules for how to build graphics cells, rather than try to guess them by peeking at various Cell expressions of "officially" constructed graphics cells. -- Steve Luttrell West Malvern, UK "Allan Hayes" <hay at haystack.demon.co.uk> wrote in message news:bhi5f7$hlg$1 at smc.vnet.net... > Dale, > I am getting something odd. > I display the inline graphics as in your code: > > gr = Plot[x, {x, 0, 1}]; > > inline = Cell[GraphicsData["PostScript", DisplayString[gr]]]; > > CellPrint[ > Cell[TextData[{inline}], "Text", TextAlignment -> Center, > CellMargins -> {{0, 0}, {0, 0}}] > ] > > Then I click on the picture without moving the mouse, and it moves to the > right - the effect. Repeated clicks move it further to the right. > The first move always gives ImageMargins->{{89, 0}, {0, 0}}. > The phenomenon is not commpletely consistent. It may be triggered by slight > movement of the mouse, but I tried holding the mouse still with one hand and > clicking with the other. > > Eventually Mathematica crashes - I get an announcement that an error has > occured and it must close down. > > I am using version 5 with Windows XP Professional. > > > Allan > --------------- > Allan Hayes > hay at haystack.demon.co.uk > Voice: +44 (0)116 241 8747 > Fax: +44 (0)870 164 0565 > > > "Dale" <dale at omegaconsultinggroup.com> wrote in message > news:bhaab5$klk$1 at smc.vnet.net... > > At 03:12 AM 8/2/2003, Oliver Friedrich wrote: > > >Hallo, > > > > > >there are options like ImageMargins to adjust the position of graphics > > >within a cell. But I'm looking for a counterpart to TextJustification for > > >graphics to say the graphics should be left, right or centered. Is there > > >something available. > > > > This can be done with an inline cell. > > > > gr = Plot[x, {x, 0, 1}]; > > > > inline = Cell[GraphicsData["PostScript", DisplayString[gr]]]; > > > > CellPrint[ > > Cell[TextData[{inline}], "Text", TextAlignment -> Center, > > CellMargins -> {{0, 0}, {0, 0}}] > > ] > > > > -------------------------------------------------------------- > > Omega Consulting > > "The final answer to your Mathematica needs" > > http://omegaconsultinggroup.com > > >