Re: Spacing of Words in Text Graphics Statements

*To*: mathgroup at smc.vnet.net*Subject*: [mg49621] Re: Spacing of Words in Text Graphics Statements*From*: "Dr. Wolfgang Hintze" <weh at snafu.de>*Date*: Sun, 25 Jul 2004 02:55:22 -0400 (EDT)*References*: <cdqqdt$kkp$1@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

This is the stripped form of David's example from wich you can select by eye the most appropriate font sizing. Show[Graphics[ {Text[ StyleForm["wristwatch time", FontFamily -> "Helvetica", FontWeight -> "Bold", FontSize -> #], {0, #}, {0, 0}] & /@ Range[6, 20, 2] } ] ]; Regards, Wolfgang David Park wrote: > One of the long standing problems I have had with text in graphics is that the spacings between words is irregular. In fact, sometimes the space between words is entirely loss. > > Here is an example. > > Needs["Graphics`Colors`"] > Show[Graphics[ > {Text[ > StyleForm["With wristwatch time indicated", > FontFamily -> "Helvetia", FontWeight -> "Bold", > FontSize -> 12], {8., 12.}, {-1, 0}]}], > PlotRange -> {{0, 16.5}, {0, 14}}, > ImageSize -> 450, > Background -> AliceBlue]; > > The space between "wristwatch" and "time" is lost. One can sort of fix it by putting in extra spaces after the bug pops up. This also happens with PlotLabel. I wonder if anyone knows why this happens. > > David Park > djmp at earthlink.net > http://home.earthlink.net/~djmp/ > > >